1. 

   Sarumian New Member

   Дано вещественное число А и целое число N(>0) Вывести А в степени N: А в степени N=А*А*А*А...*А(числа А перемножаются Nраз).

    

   Sarumian, 1 апр 2010

   #1
2. 

   honka New Member

   var a,k:real;
   n:integer;
   begin
   readln(a,n);
   k:=a;
   while n<>1 do begin
   n:=n-1;
   a:=a*k;
   end;
   writeln(a);
   end.

    

   honka, 1 апр 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня