Var St,X,Y:longint;
Begin
Write('X = ');ReadLn(X);
Write('Y = ');ReadLn(Y);
St:=1;
For Y:= 1 to Y do
St:=St*X;
Write(X,'^',Y,' = ',St)
End.
Var St,X,Y:longint;
Begin
Write('X = ');ReadLn(X);
Write('Y = ');ReadLn(Y);
Write(X,'^',Y,' = ');
St:=1;
While Y>0 do
Begin
St:=St*X;
Y:=Y-1
End;
Write(St);
End.
На первом фото - цикл. 11 раз переменной 'a' присваивается значение 'a + 5'. То есть: 0+5; 5+5; 10+5 ... 50+5; В итоге и получается 55. Начинается с 0 потому, что мы ничего не присвоили переменной 'a', а изначально оно имеет значение 0.
Словесная модель- это описания явлений, предметов, событий, процессов на естественных языках
K = 100*50 = 5000 px
i = (N=2^i == 165 = 2^(7-8)) = 8 берём большее для i
I = 5000*8 = 5000 байт
ответ: В(5000)
75 выписывают газеты,27 журналы, a 13 и то, и то,следовательно, если предположить, что тех кто ничего не выписывает нет, получается:(75+27)-13=89