Решение задач высокой сложности - PascalABC.NET
Формулировка задачи:
Хотелось бы создать тему, в которой каждый сможет выложить своё решение задач повышенной сложности (пример: олимпиадные задачи).
Правила:
Решение:
Спойлер
Прямая программа
Условие:Спойлер
Решение задачи: «Решение задач высокой сложности»
textual
Листинг программы
begin var (a, b) := ReadInteger2; Print(a, Chr(61 + Sign(a - b)), b) end.
Объяснение кода листинга программы
- В первой строке объявляются две переменные a и b типа Integer и инициализируются значением, полученным из функции ReadInteger2.
- Значение переменной a выводится на экран с помощью функции Print, при этом выводится знак равенства (=) и значение переменной b.
- Конец программы.