Question

Определите число: которое будет напечатано в результате выполнения программы (с помощью языка программирования Паскаль)

var n,s: integer
begin
n:=0;
s:=402;
while s>0 do
begin
s:=s-10;
n:=n+3
end;
write(n)
end.

Answer 1

402-(10*41)=-2 ( при этом значении условие выполняться больше не будет)
значит, к значению n нужно 41 раз прибавить 3
41*3=123