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

Mechislav
Oct 24, 2020
var x,y:integer;
begin
x:=25;
y:=-20;
while x*y<0 do begin
x:=x-5;
y:=y+2
end;
writeln('x=',x,' y=',y);
end.
// x = 0
// y = -10
begin
x:=25;
y:=-20;
while x*y<0 do begin
x:=x-5;
y:=y+2
end;
writeln('x=',x,' y=',y);
end.
// x = 0
// y = -10
575
Смежные вопросы: