1. Информатика
  2. Напишите программу, которая в

Напишите программу, которая в последовательности целых чисел определяет количество двухзначных чисел кратных 5​

amalia200030 amalia200030    3   17.05.2019 15:48    0

Ответы
romak3104Ромчук romak3104Ромчук  10.06.2020 21:49

var a,k: integer;

begin

a:=1;

k:=0;

while (a<>0) do  

begin

readln(a);

if ((a<100) and (a>9) and (a mod 5 =0)) then k:=k+1;

end;

writeln(k);

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
коу007 коу007  18.03.2021 10:56
ТЕРМІНОВО Масив з N цілих чисел перегрупували, розмістивши спочатку елементи, що були на парних місцях, але лише потім елементи з непарними індексами, не змінюючи їх наступності...
Polina211004 Polina211004  22.04.2020 14:51
Написать программу на языке Pascal с использованием цикла, так , чтобы программа по итогу выполнилась один раз, но при повторном запуске выдавала ошибку...
Alinыch11 Alinыch11  22.04.2020 14:51
НУЖНО ПЕРЕВЕСТИ НА С Верно) else Write(Не верно) End....
Nika7854 Nika7854  22.04.2020 14:51
Во Вставьте пропущенные слова.Заполните пропуски в текстеs= абвгдабвгд n=s.find( вг”)образец ( вг ) в строкеЕсли в строке несколькоМетод find возвращает номер символа, с...
Ксюшенька2017 Ксюшенька2017  22.04.2020 14:51
1. Укажите порядок выполнения логических операций в логическихвыражениях:a) a or not a and b;B) (a or not b) and (not a or not b);6) not a or not b and a;r) not a and not...
shakhid08 shakhid08  22.04.2020 14:52
Для хранения растрового изображения размером 212×212 пикселей отвели 8 КБ памяти. Каково максимально возможное число цветов в палитре изображения?...
nastiaX352 nastiaX352  22.04.2020 14:52
Создать программу на зыке Паскаль для решения примера при заданных параметрах. Что это значит:• Рисуете блок схему• Пишите саму программу на языке Паскаль с операторов и...
14света14 14света14  22.04.2020 14:53
Сколько клеток входит в диапазон (D9:H24). В ответе укажите только число....
Kетушка9 Kетушка9  22.04.2020 14:53
Даны числа: 8; 40; 403; 5652; 10487. Используя MS Excel, вычисли среднее арифметическое данных чисел....
khokhr khokhr  22.04.2020 14:53
Пытаюсь начать писать в паскале, высвечивается эточто делать ​...

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