Недавно я столкнулся с интересной задачей⁚ написать программу на Pascal, которая определяет возраст самого старшего человека из троих. У меня были данные о возрастах трех людей⁚ Антона, Бориса и Виктора, и я должен был найти самого старшего из них.Сначала я объявил переменные для хранения возрастов трех людей⁚
pascal
var
Anton, Boris, Viktor⁚ Integer;
Затем я ввел возраст каждого человека с клавиатуры, используя функцию `Readln`⁚
pascal
Readln(Anton, Boris, Viktor);
После этого я использовал условные операторы `if` для сравнения возрастов и определения самого старшего⁚
pascal
if (Anton > Boris) and (Anton > Viktor) then
writeln(‘Антон’)
else if Boris > Viktor then
writeln(‘Борис’)
else
writeln(‘Виктор’);
В этом коде я сравнивал возраст Антона с возрастами Бориса и Виктора, а также возраст Бориса с возрастом Виктора. Если условия были истинными, то я выводил имя соответствующего человека на экран с помощью функции `writeln`.Вот полный код программы⁚
pascal
program AgeComparison;
var
Anton, Boris, Viktor⁚ Integer;
begin
Readln(Anton, Boris, Viktor);
if (Anton > Boris) and (Anton > Viktor) then
writeln(‘Антон’)
else if Boris > Viktor then
writeln(‘Борис’)
else
writeln(‘Виктор’);
end.
После написания кода я скомпилировал программу и запустил ее. После ввода возрастов трех людей (17, 14, 16) программа вывела на экран имя самого старшего ⏤ Антона.
Мне очень понравилось решать эту задачу на Pascal. Решение было довольно простым и позволило мне легко определить самого старшего человека из троих. Уверен, что эта программа может быть полезной для определения старшего человека в различных ситуациях.