Var i: byte; begin for i: =10 to 25 do begin write(i,' '); writeln(i,'.4'); end; end.
Спасибо
Ответ дал: Гость
1) 24+18+12=54 (ч.) 2) 54-35=19 (ч.) не любят не один вид спорта. 3) 10+8+5=23 (ч.) - любят 2 или больше видов спорта. 4) 23-19=4 (ч.) - любят все три вида спорта.
Популярные вопросы