Укажи, к каким устройствам компьютера относятся данные элементы: dzostik.jpg Средства манипуляции Сетевое оборудование Средства отображения Системный блок

program HomeWork;

var a,b,c,P,Pp,S,Ha,Hb,Hc:real;

begin

   write('Введите стороны треугольника a, b и c (числа через пробел): '); readln(a,b,c);

   P:=a+b+c;

   Pp:=P/2;

   Ha:=2*sqrt(abs(Pp*(Pp-a)*(Pp-b)*(Pp-c)))/a;

   Hb:=2*sqrt(abs(Pp*(Pp-a)*(Pp-b)*(Pp-c)))/b;

   Hc:=2*sqrt(abs(Pp*(Pp-a)*(Pp-b)*(Pp-c)))/c;

   S:=Hc*c/2;

   writeln('Параметры треугольника со сторонами a=', a:0:3, ', b=', b:0:3, ' и c=', c:0:3, ':');

   writeln('Периметр: ', P:0:3);

   writeln('Площадь: ', S:0:3);

   if Pp-a >= 0 then writeln('Высота, опущенная на сторону a: ', Ha:0:3)

   else writeln('Высота, опущенная на сторону a (находится вне треугольника): ', Ha:0:3);

   if Pp-b >= 0 then writeln('Высота, опущенная на сторону b: ', Hb:0:3)

   else writeln('Высота, опущенная на сторону b (находится вне треугольника): ', Hb:0:3);

   if Pp-c >= 0 then writeln('Высота, опущенная на сторону c: ', Hc:0:3)

   else writeln('Высота, опущенная на сторону c (находится вне треугольника): ', Hc:0:3)

end.

4) ЕС-СВ-ВА=2+8+7=17

5) X=5

Объяснение:

4) Еще можно провести 3 дороги с Е, но они сразу будут большей длины. К 13 нужно будет добавить 3 или 7 - что заведомо больше, к 11 нужно добавить 8 или 7, что тоже заведомо больше. После ЕС можно провести дорогу СD, но она не проходит через В.

5) Можно составить уравнение выполнения команд. Неизвестное число икс значит (2*3+x+x+x)*3=63  и решим его. (6+3х)=63/3  6+3х=21 3х=21-6=15

х=15/3=5 (по условию больше или равно 2).

6) Вторая и третья строки программы говорят о том, что надо ввести с клавиатуры значения s и k. Пока Вы их не введете задача не решается (может быть масса вариантов чисел, которые при сравнении будут давать разные варианты). Например если оба числа или одно из них удовлетворяют условию (больше) программа напечатает "Да". Если s меньше или равно 5 и k меньше или равно 10 программа напечатает "Нет".