Дано двузначное число. выяснить, какая из его цифр является наибольшей. вывести наибольшую цифру на экран.pascal

221

390

Посмотреть ответы 2

Ответы на вопрос:

Aryzhaн

Информатика

4,7(98 оценок)

1. современное решение pascalabc.net 3.2, сборка 1417 от 28.03.2017 внимание! если программа не работает, обновите версию! begin var n: =readinteger('введите двухзначное число: '); writeln('максимальная цифра ',max(n div 10, n mod 10)) end. 2. школьное решения уровня турбопаскаль 1983г. var n,d,e,max: integer; begin write('введите двухзначное число: '); read(n); d: =n div 10; e: =n mod 10; if d> e then max: =d else max: =e; writeln('максимальная цифра ',max) end. 3. пример работы обоих программ (одинаковый) введите двухзначное число: 37 максимальная цифра 7