Question

Дан фрагмент программы на языке Паскаль. Как изменятся переменная S, если на экране – 102?
var s, m: integer;
begin
s := 102;
m := 39;
while s > 0 do
begin
s := ???;
m := m + 3;
end;
writeln(m);
end.

Answer 1

Полный бред 
Как цикл мог закончить свою работу при значении s = 102  если цикл работает пока s > 0 ,может все же s = - 102 в задании  ?

Answer 2

т.е для завершения цикла нужно чтобы s был отрицательным