Задача по информатике, нужно решить на pascal ABC...и я не понимаю! помогите!условие:составить программу, которая выводит на экран значение выражения X- в десятой степени, при условии X меньше 5?????????????????????????????????...
Задача по информатике, нужно решить на pascal ABC...и я не понимаю! помогите!
условие:
составить программу, которая выводит на экран значение выражения X- в десятой степени, при условии X<5
????????????????????????????????????????????????????????????????????
Гость
Ответ(ы) на вопрос:
Гость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.
Гостьuses crt;
var x:integer;
begin
read(x);
x:=x*x*x*x*x*x*x*x*x*x;
write(x);
end.
Не нашли ответ?
Похожие вопросы