Программа в паскале

[natcume]

Программа в паскале

Написать программу, выводящую на экран таблицу степеней числа 5 от нулевой до n-ой
Язык-Pascal

 

[Vladimir_S]

Написать программу, выводящую на экран таблицу степеней числа 5 от нулевой до n-ой
Язык-Pascal

А что, самостоятельно осилить эту идиотскую задачку - ну совсем никак? Ну ладно, хотя не стоило бы...

VAR
 i,N:Integer;
 r:QWord;
Begin
 Write('Nmax=27; N= ');
 ReadLn(N);
 r:=1;
 WriteLn(' 0',r:25);
 For i:=1 to N do
  begin
   r:=r*5;
   WriteLn(i:2,r:25);
  end;
 ReadLn;
End.

Если Ваш Паскаль не понимает тип QWord, то следует:
1. Заменить QWord на LongInt.
2. Ограничить максимальное значение степени числом 13.

 

[natcume]

огромное спасибо