Программа возводит число n в степень S, данные вводит пользователь. Измени цикл с предусловием этой программы на цикл с постусловием так, чтобы результат его работы не изменился.

while i < >s do

begin

res:=res*n

i:=i+1

end

ответ:

res:=*n;

i:=i+1

б)имя существительное

program dddd; uses crt; var a,b,c,i: integer; beginclrscr; c: =10; readln(a); while a < > 0 dobeginb: = a mod 10; if b < c then c: =b; a: = a div 10; end; writeln(c); readkey; end.

800*600*24*4/8=5760000 байт=5625 кбайт

в двоичной 1000001

в восмеричной 101

в шеснадцатеричной 41