tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
1. написать программу,
1. написать программу, которая выводит количество нулей во вводимой с клавиатуры последовательности из 100 целых чисел.
kjhfdklffsjsw
3 22.08.2019 22:00
0
Ответы
vyglotov
05.10.2020 13:27
Program n1;
var a,k,i: integer;
begin
k:=0;
for i:=1 to 100 do
begin
readln(a);
if (a=0) then k:=k+1;
end;
writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
JetMinegrifer
17.12.2020 16:30
Выразите предпочтительные размеры цифровой фотографии желательный размер 9×12; 10×15; 20×30. Преимущ: 768×1024, 768×1024, 1200×1600. Предпочтительные размеры цифровой...
kseniya696969
17.12.2020 16:30
C++ Сделать с while или do while Проверьте, есть ли среди данных N чисел нули.Вводится положительное целое число N, а затем N целых чисел.Требуется вывести «YES», если...
barmin2001g
10.03.2021 05:25
Задано вещественное значение аргумента x. Составить блок схему вычисления значения функции у. Построить линейный алгоритм....
Karina1155
10.03.2021 05:27
сделайте мне через час нужно уже сдать...
asya1607
10.03.2021 05:30
НУЖНА СОР ПО ИНФОРМАТИКЕ Чему будет равна переменная S после выполнения кода: s = 0 for k in range(3, 8): s = s + k print(s)...
Альберт211
10.03.2021 05:33
Написать программу в Pascal для определения количества делений числа на 2 пока число больше 10....
sushenkop08wf4
10.03.2021 05:33
Решите задачи, используя цикл, While, Repeat: 1. Вывести на экран числа от 100 до 200 с шагом 12. Вывести на экран числа от 500 до 300 с шагом 13. Вывести на экран квадраты...
Artem12309
02.03.2020 21:26
Обозначим дни недели числами от 1 (понедельник) до 7 (воскресенье) соответственно. По известному m — дню недели первого числа текущего месяца — определите день недели...
farcry7
02.03.2020 21:26
Получить шестнадцатеричную форму представления целого числа в 2-х байтовой ячейке (использовать дополнительный код)....
Leha9202
26.05.2019 16:19
Что характерно для растровой графики выберете один или несколько ответов: 1) изображение масштабируются без потери качества 2) возникает искажение изображений при изменении...
Популярные вопросы
Запиши пары слов. Сравни их по произношению и по значению. Лук луг,...
3
Вот телеграмма, которая адресована тебе. Теленграмма поздравляю переходом...
2
Прочитай текст А. Усачёва. Какой речью мы пользуемся в учебнике?...
1
Запиши слова. Поставь ударение. 1. Трава, гора, носы, моря. 2. Листы,...
2
Прочитай слова. Моск_ а, фла_ , фла и, гим_ , гер_ , гер ы, зн мя,...
1
В строке сочетаний букв найди слова. Запиши их. Отметь орфограммы....
2
Найдите закономерность. авдёзйл нп... б) Запиши письменным шрифтом...
2
Спиши, вставляя пропущенные буквы. Какие правила должна была знать...
2
Предложи свою строку с любыми спрятанными словами. Как ты поступишь,...
2
Прочитай предложения. Лошадь бежит. Курица бежит. Время бежит. Слёзы...
3
var a,k,i: integer;
begin
k:=0;
for i:=1 to 100 do
begin
readln(a);
if (a=0) then k:=k+1;
end;
writeln(k);
end.