Question

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

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

Answer 1

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

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.