Напишите программу, которая возводит в четвёртую степень введённое с клавиатуры целое число. Составьте алгоритм решения этой задачи из нескольких операторов присваивания. В Pascal.

Question

Юня

20 ноября, 23:09

+4

Ответы (1)

Знаете ответ на вопрос?

Макс · Answer 1

var a, a2, a4:integer;

begin

readln (a) ;

a2:=a*a;

a4:=a2*a2;

writeln (a,'^4 = ', a4) ;

end.

Пример:

3

81