precedeНе могли бы вы помочь с информатикой, буду очень благодарен. Даны три целых числа, найти максимальное из них. Формат входных данных : Строка, содержащая три числа. Формат выходных данных : Вывести максимальное число.
ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Ответ:
- Program Brainly;
- Var a1, a2, a3, max: integer;
- Begin
- Write ('Введите три числа: ');
- Readln (a1, a2, a3);
- If a1 >= a2 then
- max := a1 else max := a2;
- If a3 > max then max := a3;
- Writeln ('Максимальное из них: ', max);
- Readln
- end.
84
Addison SharpЧтобы ответить необходимо зарегистрироваться.
