ну составь, наверное не сложно, я не понимаю такие вопросы, особенно по АКТ
begin var x:=5; while x <= 75 do begin WriteLn(x:2, ' km = ', x*1.609:7:3, ' m.'); x+=5; end; end.
1
Нравится
Комментировать
