Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Сильнолол
04.03.2022 23:43 •
Информатика
30 дана последовательность 4.5; -3.1; 2.1; 1.8; 0.13; -1.6; 1.7; 0.3 вещественных чисел.составить программу которая находит число отрицательных членов последовательности
Показать ответ
Ответ:
pedro2408
02.10.2020 16:35
Запускаешь программу и пишешь сначала количество чисел в твоей последовательности: 8, далее вводишь свои числа.
var n,i,k:integer;
a:real;
begin
read(n);
while i<n do begin
read(a);
if (a<0) then k:=k+1; i:=i+1;
end;
writeln(k);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
26040717
15.01.2022 12:39
Тесты по HTML 1. О чем говорит тэг p align= right … /p ?Текст, заключенный в тэг, будет расположен по центру страницыТекст, заключенный в тэг, будет расположен по левому...
alinakim3
03.01.2022 06:47
1написать программу, которая находит в массиве значения, повторяющиеся два и более раз, и показывает их на экран. 2 написать программу, которая находит в массиве самое маленькое...
Даша2002111111
03.01.2022 06:47
Дано расстояние l в сантиметрах. используя операцию деления нацело, найти количество полных метров в нем (1метр= 100 см)....
светлана440
03.01.2022 06:47
Сообщение на языке бамбара (128 символов в алфавите) сообщение на языке мандинго (64 символа в алфавите) занимает 7 страниц – по 25 строк. 70 символов в строке. какое сообщение...
chokopaii
02.08.2022 05:47
В книге 49 стихотворений, 14 рассказов и 1 повесть. Какое количество информации содержится в сообщении «Игорь прочитал повесть»?...
ник4891
29.08.2022 01:24
Вставьте в текст пропущенные слова. В палитре отображается цветов, добавить еще можно, щелкнув по кнопке Изменение цветов...
kolasalnov5
12.01.2022 23:40
Тоника субдоминанта доминанта в соль мажоре...
kristinaaaaak
12.01.2022 23:40
На хоровом фестивале прозвучало 83песен 40 на казахский...
димас248
12.01.2022 23:40
Что такое диктатура сердца лорис-меликова...
Dan4ik7211
12.01.2022 23:40
Укажите длину стороны квадрата, площадь которого равна 64 см2 . а)8см в)4см с)16см д)8см2...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n,i,k:integer;
a:real;
begin
read(n);
while i<n do begin
read(a);
if (a<0) then k:=k+1; i:=i+1;
end;
writeln(k);
end.