Предмет: Информатика, автор: ivanovanataly9

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

Ответы

Автор ответа: nelle987
0
В "старом" стиле:
var
  a, h: real;
begin
  writeln('Введите длину стороны и длины проведённой к ней высоты:');
  readln(a, h);
  writeln('Площадь треугольника равна ', a * h / 2)
end.

Тоже самое, но в немного осовремененном виде (у меня запускается на PascalABC.NET 3.3 сборка 1531, если у вас не работает - обновите программу):
begin
  var (a, h) := ReadReal2('Введите длину стороны и длины проведённой к ней высоты:');
  println('Площадь треугольника равна', a * h / 2);
end.
Похожие вопросы
Предмет: Биология, автор: almirzoevэмо
Найдите 5 неправильных предложения и напишите их правильно,исправив биологически ошибки 1)Выделяют такие корни : главный боковые придаточные.2)Главный корень -это корень от которого отходят все остальные корни 3)Боковые корни растут от любых других корней 4)В стержневой корневой системе его нет 5) Мочковатая корневая система состоит из множества боковых корней, отходящих от стебля 6) В каждом корне выделяют несколько зон расположенные снизу вверх:корневой чехлик, зона деления, зона роста , зона всасывания, зона поведения 7)В зоне деления происходит разделения корней и образуется боковые корни 8)В зоне всасывания есть корневые волоски, которые всасывают воду и минералы в корне 9 Если отрезать нижнюю часть корня и лишить корень зоны деления и роста, то рост корня вниз прекращаешься 10)Такой сельскохозяйственный прием называется окучивание и он позволяет стимулировать рост боковых корней