Задача по информатике, нужно решить на pascal ABC ... и я не понимаю! помогите!

условие:

составить программу, которая выводит на экран значение выражения X - в десятой степени, при условии X<5

?

Question

Рона

23 ноября, 17:34

+1

Ответы (2)

Знаете ответ?

Петяха · Answer 1

var

x, n: real;

i: byte;

begin

write ('Введите X: ') ;

readln (x) ;

n:=x;

for i:=1 to 9 do n:=n*x;

writeln (n) ;

end.

Марка · Answer 2

Uses crt;

var x:integer;

begin

read (x) ;

x:=x*x*x*x*x*x*x*x*x*x;

write (x) ;

end.