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

условие:

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

?

Question

Полинка

15 сентября, 01:06

+5

Ответы (2)

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

Евдокия · Answer 1

Uses crt;

var x:integer;

begin

read (x);

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

write (x);

end.

Миша · Answer 2

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.