Дано целое число а. вывести на экран все степени числа 5, которые не превышают а. (программа pascal abc)

DanyNeifeld DanyNeifeld    1   02.06.2019 00:00    2

Ответы
dgafar27oy9omz dgafar27oy9omz  02.07.2020 22:29
Var
  A, n: integer;x: real;
begin
read(A);
n := 0;
for n := 1 to A do
begin
x := power(5, n);
if x <= A then
writeln(x);
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика