Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ
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
575
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам