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

Question

Ларисса

8 сентября, 00:36

+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