46

Pascal. Написать алгоритм нахождения максимума из трех чисел

irinis 02 марта 2023

Pascal. Написать алгоритм нахождения максимума из трех чисел (a,b,c) на языке Паскаль.

категория: информатика

50

uses crt; var a,x,y,z: integer; begin Write ('x='); read (x); Write ('y='); read (y); Write ('z='); read (z); if x>y then a: =1else a: =0; if (a=1) and (x>z) then write ('x-bolwe'); if (a=0) and (xy) then a: =3; if (a=0) and (y>z) then write ('y-bolwe'); if (a=3) thenwrite ('z-bolwe'); read; end. Находит большее из 3-х, ты ведь это имела ввиду)

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...