Помощь - Поиск - Пользователи - Календарь
Полная версия: Помогите написать программу на паскале
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
sathal
Помогите написать программу на паскале!!!
Задан n треугольников координатами своих вершин на плоскости. Напечатать номер треугольника с наибольшей площадью (произведения катета). Вычисление сторон и площадей, организовать с помощью подпрограмм. PS. Определить гипотенузу как самую длинную сторону площади треугольника, как определить произведения 2 сторон катетов
SviZ
Ну начните с цикла, которым перебирается массив треугольников.
for i:=1 to lenArray do
begin
...вычисляем площадь S;
if площадь больше максимальной then MaxS:=S;
end

После цикла в переменной MaxS будет максимальная площадь. no1.gif
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.