ДАЮ 30 Б

Составить программу на языке Паскаль, возведения числа х в степень числа y.

Question

Информатика

Данилей

7 июня, 05:07

ДАЮ 30 Б

Составить программу на языке Паскаль, возведения числа х в степень числа y.

+3

Ответы (1)

Знаете ответ на вопрос?

Индрек · Answer 1

Хорошо, если вы не используете функции и не используете библиотеки (типа crt)

var i, y, x, xy:integer;

begin

write ('x=') ;

readln (x) ;

write ('y=') ;

readln (y) ;

xy:=x;

for i:=1 to (y-1) do

begin

xy:=xy*x;

end;

writeln (xy) ;

end.

ДАЮ 30 БСоставить программу на языке Паскаль, возведения числа х в степень числа y.

ДАЮ 30 Б

Составить программу на языке Паскаль, возведения числа х в степень числа y.