Question

. Определите значение переменной y после выполнения следующего фрагмента программы:
x:=25;
y:=-20;
while x*y<0 do
begin
x:=x-5;
y:=y+2
end;

Answer 1

перши два скрина ет сам результат чисел
другие два скрина ет последовно