Там рандомные числа выходят точно чему равин s не возможно узнать
52(10), 101001(2)=41(10), 43(8)=35(10), 36(16)=30(10)
Var a: array[1..10] of integer; sum, i: integer;beginsum:=0;for i:=1 to 10 do begin readln(a[i]); if a[i] mod 2=0 then sum:= sum+a[i]; end;write(sum);end.
Водитель - автобус и остановка
Автобус - водитель, пассажир, контролёр
Пассажир - автобус, остановка, билет
Контролер - билет и пассажир