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

1. Объявление переменных:

   Сначала нужно объявить переменные для хранения двух чисел, результата и номера операции.

2. Ввод данных:

   Запросите у пользователя ввод двух чисел и номера операции.

3. Использование оператора CASE:

   На основе введённого номера операции используйте оператор CASE для выполнения соответствующей арифметической операции.

4. Вывод результата:

   Отобразите результат пользователю.

Вот пример кода, который иллюстрирует эти шаги:

program ArithmeticOperations;
var
    x, y, result: real;
    operation: integer;
begin
    { Ввод данных }
    writeln('Введите первое число (x):');
    readln(x);
    writeln('Введите второе число (y):');
    readln(y);
    writeln('Выберите операцию:');
    writeln('1 - Сложение');
    writeln('2 - Вычитание');
    writeln('3 - Умножение');
    writeln('4 - Деление');
    readln(operation);
    
    { Использование оператора CASE }
    case operation of
        1: begin
            result := x + y;
            writeln('Результат сложения: ', result:0:2);
           end;
        2: begin
            result := x - y;
            writeln('Результат вычитания: ', result:0:2);
           end;
        3: begin
            result := x * y;
            writeln('Результат умножения: ', result:0:2);
           end;
        4: begin
            if y <> 0 then
            begin
                result := x / y;
                writeln('Результат деления: ', result:0:2);
            end
            else
                writeln('Ошибка: Деление на ноль!');
           end;
        else
            writeln('Ошибка: Неверный номер операции!');
    end;
end.

В этом коде:

• Сначала мы объявляем переменные x, y для хранения чисел, result для хранения результата и operation для хранения номера операции.
• Затем запрашиваем у пользователя ввод чисел и номера операции.
• С помощью оператора CASE выбираем нужную арифметическую операцию и выполняем её.
• Наконец, выводим результат на экран.

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