Cls
input n
dim a(n)
for i=1 to n
input a(i)
next i
for i=1 to n
for j=1 to n
if a(i)<a(j) then swap a(i),a(j)
next j
next i
for i=1 to n
print a(i);
next i
Var i:integer;
begin
writeln('Дюймы См');
for i:=1 to 10 do
writeln(i:3,' ',2.54*i:5:2);
end.
Результат:
Дюймы См
1 2.54
2 5.08
3 7.62
4 10.16
5 12.70
6 15.24
7 17.78
8 20.32
9 22.86
10 25.40
1)
3 бита => 2^3 => 8 цветов
2)
4 бита => 2^4 => 16 цветов
Ответ под номером 3 поскольку мы сначала идем через дорогу А-С, потом С-D, потом D-E, поскольку дорога в F только одна то двигаемся по дороге E-F.