Первый вопрос б) банкоматы
Второй вопрос в)или д)
var sum,i:longint;
begin
sum:=0;
for i:=10 to 30 do
if i mod 2=0 then sum:=sum+i;
write(sum);
end;
Пусть Х - количество черных автомобилей
У - количество серых
Рч = x/(x+y+18)
= 128
x+y+18 = 128x (1)
P(не серый) = (х+18)/(x+y+18)
= 32
x+y+18 = 32x+576 (2)
из того что, левые части выражений (1) и (2) равны, следует что равны и правые части, получим
128х=32х+576
96х = 576
х=6
Ответ: 6 черных автомобилей