По информатике, нужно решить на pascal я не понимаю! ! условие: составить программу, которая выводит на экран значение выражения x- в десятой степени, при условии x< 5

nikgukasov nikgukasov    2   27.05.2019 07:00    0

Ответы
кратос2315 кратос2315  23.06.2020 23:40
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. 
ПОКАЗАТЬ ОТВЕТЫ
labzinaveronika labzinaveronika  23.06.2020 23:40
Uses crt;
var x:integer;
begin
read(x);
x:=x*x*x*x*x*x*x*x*x*x;
write(x);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика