Исходные данные расположены в файле в некотором количестве строк. Каждая строка содержит целое число К. Значения К изменяются в диапазоне от 1 до N. (N>=2). Числа К не повторяются. Число К=N обязательно присутствует в одной из строк. Всего строк (N-1), т.е. одно целое число отсутствует (потеряно!). Задача: прочитав файл один раз найти потерянное число. Массив не использовать. Если надо, использовать оператор try. Вывести на экран число, которое потеряно.
Есть во многих языках программирования, зря не указали, какой Вам надо.
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('День недели (1- Пн, 2- Вт, ... 7- Вс:');
Writeln(n<6?'Рабочий день':n=6?'Суббота':'Воскресенье')
end.
Примеры (предполагается без проверки корректность ввода)
День недели (1- Пн, 2- Вт, ... 7- Вс: 4
Рабочий день
День недели (1- Пн, 2- Вт, ... 7- Вс: 6
Суббота
День недели (1- Пн, 2- Вт, ... 7- Вс: 7
Воскресенье