program Kalkulyator;
var
a,b,d: вставить тип данных;
e: вставить тип данных;
begin
Указать оператор вывода данных ('Здравствуйте! Вы используете калькулятор.');
Указать оператор вывода данных ('Вам необходимо ввести два числа: ');
Указать оператор вывода данных ('a = ');
Указать оператор ввода данных (a);
Указать оператор вывода данных ('b = ');
Указать оператор ввода данных (b);
Указать оператор вывода данных ('Отлично! Теперь выберите операцию: ');
Указать оператор вывода данных ('Под номером 1 сложение, под номером 2 вычитание, под номером 3 умножение, под номером 4 деление.');
Указать оператор вывода данных ('Ваша операция под номером: ');
Указать оператор ввода данных (e);
Указать оператор ветвления (e=1) тогда d:=a+b;
Указать оператор ветвления (e=2) тогда d:=a-b;
Указать оператор ветвления (e=3) тогда d:=a*b;
Указать оператор ветвления (e=4) тогда d:=a/b;
Указать оператор вывода данных ('Результат операции = ', d);
end.