Есть ответ 👍

построить алгоритм возведения числа х в степень n-152.

133
422
Посмотреть ответы 2

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


program gwr;

var x,n,s,i : integer;

begin

s:= 1;

writeln('Введите число, которое нужно возвести в степень: ');

read(x);

writeln('Введите число n');

readln(n);

n := n - 152;

for i := 1 to n do

 s := s*x;

writeln(s);

end.

Andrebro9
4,7(37 оценок)

1) var a,b,r: integer; begin write('a = '); readln(a); write('b = '); readln(b); r: =a-b; writeln(a,'-',b,' = ',r); end. пример: a = 21 b = 15 21-15 = 6 2) var fam: string; begin write('введите фамилию: '); readln(fam); writeln('     *'); writeln('   ***'); writeln('   *****'); writeln(' *******'); writeln('*********'); writeln('***   ***'); writeln('***   ***'); writeln('***   ***'); writeln('*********'); writeln('*********'); writeln; writeln('     ',fam); end. результат: введите фамилию: master     *     ***   *****   ******* ********* ***   *** ***   *** ***   *** ********* *********       master

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