Предмет: Информатика,
автор: Анюта0690
Используя цикл for возвести число 3 в степень введенную пользователем.
Ответы
Автор ответа:
2
var m,s,b,a:integer;
begin
writeln ('Введите степень:');
read (m);
b:=3;
s:=1;
for a:=1 to m do begin
s:=s*b;
end;
writeln('3 в степени ',m,': ',s);
end.
Похожие вопросы
Предмет: Геометрия,
автор: hdhsgevejkwjdjd
Предмет: Химия,
автор: zmeulvitalina7
Предмет: Русский язык,
автор: d628210
Предмет: Математика,
автор: Rtyhjik
Предмет: Физика,
автор: NeOnRussia