В целочисленных массивах a и b содержатся длины катетов десяти…

В целочисленных массивах a и b содержатся длины катетов десяти прямоугольныхтреугольников: a[i] — длина первого катета; b[i] — длина второго катета i-го треугольника. Найдите треугольник с наибольшей площадью. Выведите его номер, длины катетов и площадь. Предусмотрите случай, когда таких треугольников несколько. (программа с randomize)

в избранное

anonim

31 марта 2023

Program n1; Uses CRT; Const n=10; Var a,b: array[1… n] of integer; i,a1,b1: integer; s,s1: real; beginClrScr; Randomize; For i: =1 to n do begin a[i]: =random (20); b[i]: =random (20); end; For i: =1 to n do begin s: =a[i]*b[i]/2; if s>s1 then begin s1: =s; a1: =a[i]; b1: =b[i]; end; end; Writeln ('Naibolshya ploshad ',s,' y treugolnika s katetami ',a1,' i ',b1); readlnend.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?