Задание:
Найти большее из трех разных чисел. Надо блок-схему к задаче. Нужно на завтра!
Решение:
vara,b,c,h: integer; beginread (a,b,c); if a>b then h: =aelse h: =b; if c>h then h: =c; writeline ('Hight number=',h); end.
Знаете другой ответ?
Найти большее из трех разных чисел. Надо блок-схему к задаче. Нужно на завтра!
vara,b,c,h: integer; beginread (a,b,c); if a>b then h: =aelse h: =b; if c>h then h: =c; writeline ('Hight number=',h); end.
Знаете другой ответ?