Задание:
Помогите решить задачу в паскале. Так чтобы ее можно было ввести и она пошла (а то ни 1 не идет, которую мне здесь написали, то ли я не так вожу то ли еще что…) ввести 3 числа. Выбрать и напечатать наибольшее
Решение:
Var a,b,c: integer; beginreadln (a,b,c); if (a>b) and (a>c) then writeln (a); if (b>a) and (b>c) then writeln (b); if (c>a) and (c>b) then writeln (c); end.
Знаете другой ответ?