Напишите программу: Найти произведение чисел, оканчивающихся ** 5, в промежутке от 1 до...

Question

Напишите программу: Найти произведение чисел, оканчивающихся на 5, в промежутке от 1 до 100.

Answer 1

Program n_1;
var s, i: int64;
begin
s:=5;
i:=15;
while (i<=100) do begin<br> s:=s*i;
i:=i+10;
end;
writeln(s);
end.