Написать программу вычисления площади треугольника - Turbo Pascal

Формулировка задачи:

Написать программу вычисления площади треугольника, если известна длина основания и высота. Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом). Вычисление площади треугольника. Введите исходные данные: Основание (см) -> 8.5 Высота (см) -> 10 Площадь треугольника: 42.50 кв.см.

Решение задачи: «Написать программу вычисления площади треугольника»

Листинг программы

program ax;
uses crt;
var s,h,a:real;
begin
clrscr;
writeln('введите исходные данные ');
wriyeln('основание(см)');
readln(a);
writeln('высота(см)');
readln(h);
s:=0.5*a*h;
writeln('s= ',s);
readkey;
end.

Объяснение кода листинга программы

Программа начинается с объявления используемых единиц и переменных.
Выводится сообщение для ввода исходных данных.
Считываются данные для основания и высоты треугольника.
Вычисляется площадь треугольника как половина произведения основания на высоту.
Выводится значение площади.
Программа завершается, ожидая ввода пользователя.