Составьте программы на Паскаль для вычисления выражений:

x в степени 8, x вводится с клавиатуры

Если х - любое число, то вот:

var x, a, b, c: real;

begin

read (x);

a:=x*x;

b:=a*a;

c:=b*b;

write (c);

end.

Если х - целое число, то вот:

var x, a, b, c: integer;

begin

read (x);

a:=x*x;

b:=a*a;

c:=b*b;

write (c);

end.