Автор Grey Wolf задал вопрос в разделе Другие языки и технологии
Паскаль. Присвойте z значение большего из чисел x и y в том случае, если х<0, и меньшего, если х>=0. и получил лучший ответ
Ответ от
program qq;
var x,y,z:real;
begin
write('Введите х >>>');
readln(x);
write('Введите y >>>');
readln(y);
if x<0 then if x>y then z:=x else z:=y else if x<y then z:=x else z:=y;
write(z);
end.
Ответ от Cublen[гуру]
if (X < 0 ) and (x > y) then z:=x else if (x > = 0) then ( if x <=y then z:=y ;
if (X < 0 ) and (x > y) then z:=x else if (x > = 0) then ( if x <=y then z:=y ;
Ответ от 22 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Паскаль. Присвойте z значение большего из чисел x и y в том случае, если х<0, и меньшего, если х>=0.