СОСТАВИТЬ ПРОГРАММУ В ПАСКАЛЕ!!!
В гонках участвовало 17 машин (номера идут по порядку). Каждая вторая машина сошла с дистанции по той ил иной причине. Составьте алгоритм определения их номеров.
В гонках участвовало 17 машин (номера идут по порядку). Каждая вторая машина сошла с дистанции по той ил иной причине. Составьте алгоритм определения их номеров.
More Questions From This User See All
Answers & Comments
Verified answer
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