Войти Регистрация Спроси ai-bota

Запросить 40 чисел подсчитать количество чисел равных 0

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

Anele2003

29.06.2021 17:10

Определи вид информации по форме представления. Установи соответствие с видом информации:схема — 1- звуковая2-числовая 3- Видеоинформация 4-текстоваяГрафическая...

dzhele19

29.06.2021 17:10

Дано: for i := 1 to 55 do При первом выполнении тела цикла i =...

софа448

05.12.2022 18:15

Все 5-буквенные слова, составленные из букв А, К, Р, У, записаны в ал-фавитном порядке. Вот начало списка: 1. 2. К 3. Р 4. У 5. АААКА ... Запишите слово, которое стоит на...

льоха7

29.05.2021 23:58

1) Сколько Кбайт составляет сообщение объемом 1/1024 Мбайта2) Десятичное число 28 в двоичной системе счисления равноОчень...

haylayjonesty

04.01.2020 18:30

сделать таблицы в сделать таблицы в excel >...

ЕсенжоловаЛяззат

30.05.2020 06:58

Необходимо написать название элементов (интерфейса) текстом...

Виола122006

16.01.2023 02:59

ХЕЛЛП МИ ТЕСТ Вариант 1 Запрос Найдено страниц (в тысячах) Лилии | Розы 3700 Лилии & Розы 1600 Розы 2800 Какое количество страниц (в тысячах) будет найдено по запросу Лилии?...

Лера100223

10.06.2021 20:09

Задание 2 Для какого из приведённых имён ложно высказывание: НЕ (Первая буква согласная) ИЛИ НЕ (Последняя буква гласная)? 1. Иван 2. Михаил 3. Вера 4. Любовь...

MIshaFabretus

21.09.2021 08:17

)сколько символов содержит текст, занимающий 1 кбайт памяти?...

dashademidkinaozz914

30.08.2021 10:36

На какую тему можно сделать презентацию? ! по информатике задали презентацию сделать. в презентации я должен что-то показать людям. например про проффесии ( я хочу расскзать...

Ответ:

juliadzyombak

06.10.2020 20:53

Program n1;
var i,k,a: integer;
begin
k:=0;
for i:=1 to 40 do begin
readln(a);
if a=0 then k:=k+1;
end;
write(k);
end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку