Есть ответ 👍

Составить программу проверяющую является ли треугольник прямоугольным если известны величины двух его остров углов

147
326
Посмотреть ответы 2

Ответы на вопрос:

Anrehah
4,8(47 оценок)

Var a, b: integer; begin writeln('введите углы'); readln(a, b); if a+b = 90 then writeln('прямоугольный') else writeln('не прямоугольный'); end.

===== PascalABC.NET ====

= 1 =

begin

 var a := ReadArrInteger(15);

 var i := a.IndexMin;

 Print('Минимальный элемент номер', i + 1, 'равен', a[i])

end.

= 2 =

begin

 var x : array of real :=

     (-17.3, 13.2, -7, -2.36, 123.4, -0.3, 12.356, 142, 0, -1);

 x.Indices((v,i) -> i.IsEven and (v >= 5.1) and (v <= 32.4))

     .Count.Print

end.

Популярно: Информатика