Найти значение и составить блок-схему {min(x,y), x< 0 z= {max(x,y), x> =0

невідомий34 невідомий34    2   17.05.2019 15:50    4

Ответы
blackmaster2442 blackmaster2442  10.06.2020 20:26

var
x,y,z:integer;
begin

wread(x,y);

if x<0 then
if x <= y then
z:=x
else
z:=y
else
if x >=y then
z:=x
else
z:=y;

Writeln(z);
readln;
end.

 

P.S. Если понравилось решение не забудь отметить как лучшше. ;)


Найти значение и составить блок-схему {min(x,y), x< 0 z= {max(x,y), x> =0
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика