Для расчета зарплаты работника с почасовой оплатой, нам необходимо знать два параметра:

• A - тарифная ставка за 1 час работы (в рублях);
• B - количество отработанных часов в месяц.

Формула для расчета зарплаты будет следующей:

Зарплата = A * B

Теперь давайте рассмотрим, как это можно реализовать на языке Паскаль. Вот пример кода, который выполняет данную задачу:

program SalaryCalculation;
var
    A, B, Salary: real; // Объявляем переменные для тарифной ставки, отработанных часов и зарплаты
begin
    writeln('Введите тарифную ставку за 1 час (A):');
    readln(A); // Считываем тарифную ставку
    writeln('Введите количество отработанных часов в месяц (B):');
    readln(B); // Считываем количество отработанных часов
    
    Salary := A * B; // Рассчитываем зарплату
    
    writeln('Зарплата работника составляет: ', Salary:0:2, ' рублей'); // Выводим результат с двумя знаками после запятой
end.

В этом коде:

1. Мы объявляем переменные A, B и Salary типа real для хранения тарифной ставки, количества отработанных часов и зарплаты соответственно.
2. С помощью writeln выводим на экран запрос на ввод тарифной ставки и считываем ее с помощью readln.
3. Аналогично, запрашиваем и считываем количество отработанных часов.
4. После этого, используя формулу, мы рассчитываем зарплату и сохраняем результат в переменной Salary.
5. Наконец, выводим рассчитанную зарплату на экран с форматированием до двух знаков после запятой.

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