Помогите. Составьте программу в паскале для нахождения произведения всех двухзначных...

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

Помогите. Составьте программу в паскале для нахождения произведения всех двухзначных чисел, кратных пяти, используя цикл с параметром


Информатика (390 баллов) | 47 просмотров
Дан 1 ответ
0 голосов

Var i,b:integer;
begin
b:=1;
for i:=10 to 99 do
if (i mod 5) = 0 then 
b:=b*i;
writeln('Ответ: ',b);
end.

(444 баллов)