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

0 голосов
28 просмотров

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


Информатика (372 баллов) | 28 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var
i,a:integer;
begin
a:=0;
for i:=1 to 90  do
if i mod 5<>0 then
 a:=a+1;
writeln('Количество чисел не кратных 5: ',a);
end.

(1.8k баллов)