Предмет: Информатика,
автор: NataCocles
Дано вещественное число "а". Вывести все степени числа "а" от 1 до 10.
Ответы
Автор ответа:
0
можно так
var
a :real;
i :integer;
Begin
readln(a);
for i := 1 to 10 do
begin
writeln(exp(i*ln(a)));
end;
readln
end.
var
a :real;
i :integer;
Begin
readln(a);
for i := 1 to 10 do
begin
writeln(exp(i*ln(a)));
end;
readln
end.
Похожие вопросы
Предмет: История,
автор: Аноним
Предмет: Литература,
автор: sazontovakira95
Предмет: Українська мова,
автор: yofako
Предмет: Алгебра,
автор: serg1797
Предмет: Математика,
автор: FlyProgec1954