Вывести все целые степени числа A от 1 до N

@Neznakom4eg · Регистрация: 01.07.2014

Author24 — интернет-сервис помощи студентам

Дано вещественное число A и целое число N (> 0). Вывести все целые степени числа A от 1 до N. Использовать цикл for.

@vint-81 · 09.10.2014, 16:19

Pascal

var a,p:real;
    n,i:integer;
begin
    writeln('a=?');
    readln(a);
    writeln('n=?');
    readln(n);
    p:=1;
    for i:=1 to n do
     begin
      p:=p*a;
      writeln(a:0:3,'^',i,'=',p:0:3)
     end;
    readln
end.

@Neznakom4eg · 09.10.2014, 16:38 **[ТС]**

Спасибо

@Neznakom4eg 0 / 0 / 0 Регистрация: 01.07.2014 Сообщений: 20
		1
	Вывести все целые степени числа A от 1 до N 09.10.2014, 16:09. Показов 12041. Ответов 2 Метки нет (Все метки) Дано вещественное число A и целое число N (> 0). Вывести все целые степени числа A от 1 до N. Использовать цикл for. 0

@Neznakom4eg 0 / 0 / 0 Регистрация: 01.07.2014 Сообщений: 20
	09.10.2014, 16:38 [ТС]	3
	Спасибо 0

Вывести все целые степени числа A от 1 до N

Решение