'Площадь прямоугольного треугольника - Pascal

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

написать программу в которой компьютер должен вывести "введите длину треугольника" и зажечь курсор после ввода в новой строке "введите ширину" и зажечь курсор а затем с новой строке "плоащадь равна и значание" (версию не знаю,мы пишем в тетради)(потом переносим в пк)

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

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

uses 
  crt;
var
  a, b, s: real;
 
begin
  CursorOff;
  write('Введите длину треугольника: ');
  CursorOn; 
  readln(a);
  CursorOff;
  write('Введите ширину треугольника: ');
  CursorOn; 
  readln(b);
  s := (a + b) / 2;
  writeln('Площадь прямоугольного треугольника: ', s);
end.

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

В начале объявляются необходимые переменные: a, b и s типа real.
Затем происходит отключение курсора с помощью функции CursorOff.
Выводится сообщение «Введите длину треугольника: », после чего с помощью функции CursorOn считывается значение переменной a.
Выводится сообщение «Введите ширину треугольника: », после чего с помощью функции CursorOn считывается значение переменной b.
Вычисляется среднее значение длины и ширины треугольника, присваивая переменной s значение (a + b) / 2.
Выводится сообщение «Площадь прямоугольного треугольника: », после чего выводится значение переменной s.
Программа завершается.