А) C помощью сетевого коммутатора или маршрутизатора, так как нам надо будет подключить несколько компьютеров.
Б) DSL через телефон домашний или высокоскоростной через оптоволокно ( одним словом проводной).
В) Беспроводной интернет (Wi-fi).
1. Допустим, Андрей правильно назвал цвет - синий. Тогда он неверно назвал марку и автомобиль - не мерседес. Тогда Егор, сказавший что автомобиль не синий, солгал и автомобиль должен быть марки Форд. Саша должен быть прав хотя бы в одном высказывании, но сказанное им не совпадает ни с цветом автомобиля (синий), ни с маркой (Форд). Отсюда следует, что автомобиль не синий.
2. У нас по условию есть только два цвета автомобиля - синий и черный. И поскольку автомобиль не синий, то он может быть<em />только<em> черным.</em>
3. Саша правильно назвал цвет автомобиля, тогда его марка - не Джип. Андрей неверно назвал цвет автомобиля, тогда марка автомобиля - <em>Мерседес</em>. Егор сказал, что автомобиль не синий и это правда. Он также сказал, что автомобиль марки Форд - и это неправда.
<em><u>Ответ:</u></em> автомобиль - черный "Мерседес"
1)
var
a,b,c:real;
begin
readln(a,b);
c:=180-a-b;
if (a>90) or (b>90) or (c>90) then writeln('тупоугольный')
else
if (a=90) or (b=90) or (c=90) then writeln('прямоугольный')
else writeln('остроугольный');
end.
2)
var
v:real;
begin
readln(v);
if v<7.8 then writeln ('ракета упадет на Землю');
if v=7.8 then writeln ('ракета станет спутником Земли');
if (v>7.8) and (v<=16.4) then writeln ('ракета останется в пределах Солнечной системы');
if (v>16.4) then writeln ('ракета покинет пределы Солнечной системы');
end.
const
n=30;
var
a:array [1..n] of integer;
i,min:integer;
begin
for i:=1 to n do begin
readln (a[i]);
if a[i]>=20 then min:=a[i];
end;
for i:=2 to n do
if (a[i]>=20) and (a[i]<min) then min:=a[i];
writeln (min);
readln;
end.