Кто разбирается написать программу в паскаль: найти наибольшее из 3 заданных чисел a, b и c

154Dance3 154Dance3    2   17.08.2019 17:30    1

Ответы
mariya1810 mariya1810  17.08.2019 17:30
Простая программка для сравнения 3 чисел(min_max_1): program min_max; var a,b,c,min,max: integer; begin write('введите 3 числа для сравнения (через пробел) : '); read(a,b,c); min: =a; max: =a; if b> max then max: =b; if b< min then min: =b; if c> max then max: =c; if c< min then min: =c; writeln('максимальное число : ',max); writeln('минимальное число : ',min); readln; end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика