Написать программу, которая выдаёт все степени числа N от 1 до 10

Question

Информатика

Эра

1 февраля, 15:37

Написать программу, которая выдаёт все степени числа N от 1 до 10

+3

Ответы (1)

Знаете ответ?

Мариана · Answer 1

Язык не указан. На Паскале будет так:

Program stepen;

var n, s:real;

i:integer;

begin

write ('Введите число: ') ;

readln (n) ;

i:=0;

while i10 do

begin

s:=power (n, i+1) ;

i:=i+1;

writeln (n,' в ', i,' степени = ', s) ;

end;

end.