Информатика, опубликовано 2018-08-22 23:29:46 by Гость
Дано целое число А. Вывести на экран все степени числа 5, которые не превышают А. (Программа Pascal ABC)
Ответ оставил Гость
Var
A, n: integer;x: real;
begin
read(A);
n := 0;
for n := 1 to A do
begin
x := power(5, n);
if x writeln(x);
end;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.