Есть ответ 👍

Посчитать кол-во цифр в числе справа-налево, с divmode

251
427
Посмотреть ответы 1

Ответы на вопрос:


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.

Популярно: Информатика