1) Составить программу, запрашивающую ввод с клавиатуры двух чисел.
2) Составить программу вычисления площади треугольника по основанию а и высоте h ( формула для расчёта S=1/2*a*h)

program Laba;var a, //вводимое сторона h, //вводимая высота S //площадь треугольника : real; //все переменные вещественного типа, что бы можно было выводить дробные числаbegin

Writeln('Enter triangle side: '); Readln(a); //вводим сторону Writeln('Enter triangle height: '); Readln(h); //вводим высоту S:=(a*h)/2; //считаем площадь по формуле Write('Area of a triangle is:'); Write(S:10:5); //выводим площадь, вывод форматируем, не больше 10 знаков целого числа и 5 для дробной частиend.

В прикрепленном файле нет текста первой программы.