Question

Паскаль. Составьте программу вычисления площади треугольника с основанием a и высотой h. Значения a и h введите с клавиатуры.

Answer 1

Begin
  var  a : integer;
  var  h : integer;
  var  res : real;

  Readln(a);
  Readln(h);
  res := a * h / 2;
  writeln(res);
end.

Answer 2

Вычисление площади треугольника в Паскале

Для вычисления площади треугольника с основанием `a` и высотой `h` в Паскале, можно использовать следующую программу:

program CalculateTriangleArea;
var
  a, h, area: real;
begin
  writeln('Введите значение основания треугольника (a): ');
  readln(a);
  
  writeln('Введите значение высоты треугольника (h): ');
  readln(h);
  
  area := (a * h) / 2;
  
  writeln('Площадь треугольника: ', area);
end.

В этой программе мы объявляем переменные `a`, `h` и `area` типа `real` (вещественное число). Затем мы запрашиваем у пользователя ввод значения основания `a` и высоты `h` с помощью функции `readln`. Далее, мы вычисляем площадь треугольника по формуле `(a * h) / 2` и сохраняем результат в переменную `area`. Наконец, мы выводим результат с помощью функции `writeln`.

Пример работы программы:

Введите значение основания треугольника (a):
5

Введите значение высоты треугольника (h):
8

Площадь треугольника: 20

Обратите внимание, что программа ожидает ввода чисел с плавающей точкой (например, 5.0 или 8.5). Если пользователь вводит некорректные значения, программа может выдать ошибку или неправильный результат.