Предмет: Информатика,
автор: 8641683uxwyb
напишите программу:
Найти произведение чисел, оканчивающихся на 5, в промежутке от 1 до 100.
Ответы
Автор ответа:
0
program n_1;
var s, i: int64;
begin
s:=5;
i:=15;
while (i<=100) do begin
s:=s*i;
i:=i+10;
end;
writeln(s);
end.
var s, i: int64;
begin
s:=5;
i:=15;
while (i<=100) do begin
s:=s*i;
i:=i+10;
end;
writeln(s);
end.
Похожие вопросы
Предмет: География,
автор: nadiaolijnik36
Предмет: История,
автор: galinavasistuk
Предмет: Математика,
автор: borbicdarin
Предмет: Математика,
автор: Аноним