В некотором учебном заведении действуют следующие правила приёма. Абитуриенты сдают 3 экзамена. Если они набирают не менее 80 баллов, это даёт им право поступить на дневное отделение, если от 40 до 60 - на вечернее, от 20 до 40 - на заочное, ниже 20 - отказ в приёме на учёбу. Написать программу на Pascal, которая в зависимости от суммы набранных баллов сообщает абитуриенту его права на поступление

Для решения этой задачи на языке Pascal необходимо написать программу, которая будет принимать сумму баллов за три экзамена, а затем на основе полученной суммы определять, на какое отделение может поступить абитуриент, либо если ему будет отказано в приёме.

Вот пример программы на Pascal:

pascal
program AdmissionRights;
var
  score: Integer;
begin
  { Ввод суммы баллов }
  Write('Введите сумму баллов: ');
  ReadLn(score);
  
  { Определяем право на поступление в зависимости от набранных баллов }
  if score >= 80 then
    WriteLn('Поступление на дневное отделение')
  else if (score >= 40) and (score < 80) then
    WriteLn('Поступление на вечернее отделение')
  else if (score >= 20) and (score < 40) then
    WriteLn('Поступление на заочное отделение')
  else
    WriteLn('Отказ в приёме на учёбу');
  
end.

Пояснение:

1. Переменная score: Хранит сумму баллов, которую вводит абитуриент.
2. Чтение суммы баллов: Программа выводит сообщение "Введите сумму баллов" и ожидает ввода числа.
3. Условия проверки:
   • Если сумма баллов больше или равна 80, то абитуриент поступает на дневное отделение.
   • Если сумма баллов от 40 до 79 (включительно), то поступление на вечернее отделение.
   • Если сумма баллов от 20 до 39, то абитуриент может поступить на заочное отделение.
   • Если сумма баллов меньше 20, то абитуриенту отказано в приёме на учёбу.
4. Вывод: В зависимости от суммы баллов программа выводит соответствующее сообщение.

Пример работы программы:

• Ввод: 85 — Вывод: "Поступление на дневное отделение"
• Ввод: 55 — Вывод: "Поступление на вечернее отделение"
• Ввод: 35 — Вывод: "Поступление на заочное отделение"
• Ввод: 10 — Вывод: "Отказ в приёме на учёбу"

Таким образом, программа корректно определяет права абитуриента на поступление, основываясь на сумме баллов за экзамены.