Исходник простой программы, которая возводит любое, введённое с клавиатуры число в нужную вам степень. Открывается программами Pascal ABC, Pascal ABC.Net и Turbo Pascal. Пояснительных комментариев нет. Имеет не скомпилированный формат для редактирования .pas. Данная программа использует раннее пройденный цикл параметром FOR.
Исходный код программы:
program step;
var a, n, i, res :integer;
begin
writeln ('Введите сначала число а затем его степень ...');
read (a, n);
res:= 1;
for i:= 1 to n do
res:=res*a;
write ('Результат = ',res);
end.
var a, n, i, res :integer;
begin
writeln ('Введите сначала число а затем его степень ...');
read (a, n);
res:= 1;
for i:= 1 to n do
res:=res*a;
write ('Результат = ',res);
end.
Скачать: stepen.pas
Разобраться в коде данной программы вы можете, изучив Урок 5 и Урок 6: Циклы while, for, repeat. Исходник программы для нахождения степени числа входит в серию уроков Циклы.