Запишите число, которое будет напечатано в результате выполнения следующей программы. var n, s: integer;
begin
n:= 0;
s:= 0;
while s <= 365 do begin
s:= s + 36;
n:= n + 10
end;
write(n)
end.

Объяснение:

В начале s = 0, n = 0

Пока s <= 365

К s Будет прибавляться 36, потом к n Будет прибавляться 10

s = 36

n = 10

Всё ещё меньше 365

s = 72

n = 20

S Меньше 365, продолжаем пока s не станет больше 365

s = 108

n = 30

s = 144

n = 40

s = 180

n = 50

s = 216

n = 60

s = 252

n = 70

s = 288

n = 80

s = 324

n = 90

s = 360

n = 100

s = 396

n = 110

Теперь 396>365, программа выходит из цикла while и выводит n,

n = 110

ответ: 110