Программа на языке Кумир, которая находит наибольшее из пяти введенных чисел:

Алгоритм макс_число;
Перем цифра, макс;
Ввод(`Введите число 1:`);
макс := цифра;
Ввод(`Введите число 2:`);
Если цифра > макс Тогда
макс := цифра;
КонецЕсли;
Ввод(`Введите число 3:`);
Если цифра > макс Тогда
макс := цифра;
КонецЕсли;
Ввод(`Введите число 4:`);
Если цифра > макс Тогда
макс := цифра;
КонецЕсли;
Ввод(`Введите число 5:`);
Если цифра > макс Тогда
макс := цифра;
КонецЕсли;
Вывод(`Наибольшее число: `, макс);
КонецАлгоритма;

Этот код принимает 5 чисел от пользователя и находит наибольшее из них.