Предмет: Информатика,
автор: Ekaterina4
помогите, плиииз! найти значение и составить блок-схему
{min(x,y), x< 0
z=
{max(x,y), x>=0
Ответы
Автор ответа:
0
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. Если понравилось решение не забудь отметить как лучшше. ;)
Приложения:

Интересные вопросы
Предмет: Русский язык,
автор: simatovv2006
Предмет: Қазақ тiлi,
автор: sabyrovaaliya2002
Предмет: Экономика,
автор: MissRandlePataki
Предмет: Химия,
автор: Eygeny
Предмет: Алгебра,
автор: Baxshik