Составить программу в ! в гонках участвовало 17 машин (номера идут по порядку). каждая вторая машина сошла с дистанции по той ил иной причине. составьте алгоритм определения их номеров.

Var i:integer;
begin
writeln('Сошли с дистанции машины:');
for i:=1 to 17 do
 if i mod 2 = 0 then write(i,'  ');
writeln;
end.

Результат:
Сошли с дистанции машины:
2  4  6  8  10  12  14  16