Есть ответ 👍

Паскаль 9 класс, integer, подпрограммы Написать программу используя процедуру, которая вычисляет a^n. Целые числа a и n вводятся с клавиатуры.

169
359
Посмотреть ответы 2

Ответы на вопрос:


program z;

var a, n:integer;

procedure s(x,y:integer);

var i,s:integer;

begin

s:=1;

for i:= 1 to y do s:= s * x;

write('Степень числа равна: ',s)

end;

begin

write('Введите число: ');

readln (a);

write ('Введите степень числа: ');

read (n);

s(a,n)

end.


иимраишрчшрл

вдомвщосыдоор

сговш

Объяснение:

Популярно: Информатика