Ввести число. Если оно четное, разделить его на 4, если нечетное — умножить на 5 (Паскаль).

Для решения задачи на языке Паскаль нужно написать программу, которая выполняет следующие действия:

1. Вводит число.

2. Проверяет, четное ли оно или нечетное.

3. Если число четное, делит его на 4.

4. Если число нечетное, умножает его на 5.

Пример кода на Паскале:

pascal
Копировать
program DivideOrMultiply;
var
  number: Integer;
begin
  // Ввод числа
  Write('Введите число: ');
  ReadLn(number);
  // Проверка на четность
  if number mod 2 = 0 then
    // Если число четное, делим его на 4
    WriteLn('Результат: ', number div 4)
  else
    // Если число нечетное, умножаем на 5
    WriteLn('Результат: ', number * 5);
end.

Объяснение:

• mod 2 проверяет остаток от деления числа на 2. Если остаток равен 0, значит число четное.

• div 4 делит число на 4 без остатка, если оно четное.

• Если число нечетное, то просто умножаем его на 5.

Программа выводит результат в зависимости от того, четное ли число или нет.