Ответ:
8
Объяснение:
смотри прикрепленные изображения:
перебрать все города,и смотреть по построенному графу,можно ли попасть во все остальные
и замечаем,что только из 8 можно попасть во все остальные города
заметить, что в город 8 нельзя никак попасть, а в остальные города из 8 можно, следовательно город 8 - будущая столица
10бит 20бит 2байта 1010байтов 1Кбайт
Если поменять местами буквы, получится два слова - совет и отвес
Программа может выглядеть такЖ
uses crt;
const n=4;
type Mas=array [1..n] of real;
Var A: Mas;
i: integer;
Sum, Sred: real;
Begin
ClrScr;
for i:=1 to n do
begin
Write('A[',i, ']=');
ReadLn(A[i]);
Sum:=Sum+A[i];
end;
Sred:=Sum/n;
WriteLn ('Sred = ', Sred:5:2);
ReadLn;
end.
//PascalABC.NET v3.3 1633
var arr: array [1..9] of byte;
begin
for var i:=1 to 9 do
arr[i]:=random(50,60);
for var i:=1 to 9 do
writeln(arr[i]);
var sum:=0;
for var i:=1 to 9 do
sum += arr[i];
writeln('Сумма эл. массива: '+sum);
end.