tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вводится число n, а затем
Вводится число n, а затем n чисел. подсчитайте, сколько среди данных n чисел нулей.
olyaokeio
1 27.05.2019 18:30
3
Ответы
GenaTurboKrytt
24.06.2020 20:47
Program Z_n;
var a:array[1..10000] of integer;
N,c,i:integer;
Begin
Readln(N);
For i:=1 to N do begin
Readln(a[i]); // вводите числа через enter
if a[i]=0 then c:=c+1;
end;
Writeln('Среди введеных чисел' ,c,' нулей');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Olia234566
20.01.2020 11:59
Интернет: за и против 1. напишите 10 фактов за интернет 2. напишите 10 фактов против интернета ставлю 20 ! ...
MiraQeen
23.04.2020 16:17
Получить шестнадцатеричную форму внутреннего представления числа в формате с плавающей точкой в 4-х байтовой ячейке. 13.333...
ученица999999999
28.11.2021 18:16
Укажи верный вариант формулы для подсчета суммы отрицательных чисел в диапазоне ячеек А4:A16...
sashamakarova30
28.11.2021 18:19
Какие особенности в названии файлов существуют в ОС Windows?...
TASHER228YMM
28.11.2021 18:21
В электронной государственной библиотеке хранятся научные статьи учёных физиков. В среднем каждая статья состоит из 3 страниц, на каждой странице 25 строк(-и), в каждой...
annaozerkevich
24.05.2019 00:30
Переведите десятичное число 156 в двоичную систему счисления...
Like2942
13.01.2021 05:41
Домашнее задание:Прочитать параграф 16,выполнить задание на стр.74Выполняем в тетради...
koalakoalakoala
13.01.2021 05:45
Составить блок-схему алгоритма вычисления значения функции y =(x2-8)/4x(x+1) выделяя каждое арифметическое действие в отдельный блок...
ася992
20.06.2019 18:40
Укажите вариант,в котором на месте пропуска пишется одна и та же буква 1),, 2),, 3),, 4),,...
vladpin01
20.06.2019 18:40
Выполнить звуко-буквенный разбор слова мороз...
Популярные вопросы
Напишите ионное уравнение: HF, H2, Br2O7, SiO2, F2,...
3
Почему бабушка Люба продолжала облагораживать подъезд и лучший ответ...
3
Люди каких профессий занимаются изготовлением мороженго?...
3
Один острый угол прямоугольного треугольника в два раза больше другого....
2
Напишите по одному вопросу к каждому предложению начиная их словами,...
3
Приведите примеры пословиц из сборника Даля псловицы русского народа...
3
Менің атым Қожа Шығармаға композициялық талдау жасаңдар. 1.Оқиғаның...
1
Сен тәуелсіз елде еркін өмір сүріпжатырсың ба?...
1
Құрамында болымды етістігі бар 2 шумақ өлең, құрамында болымсыз етістіктері...
3
Башенный кран равномерно поднимает груз массой m = 0,60 т на высоту...
1
var a:array[1..10000] of integer;
N,c,i:integer;
Begin
Readln(N);
For i:=1 to N do begin
Readln(a[i]); // вводите числа через enter
if a[i]=0 then c:=c+1;
end;
Writeln('Среди введеных чисел' ,c,' нулей');
end.