Известны средняя скорость движения катера, скорость течения реки и расстояние между двумя пунктами, - id198219320200109 от altemirovap0cn54 09.01.2020 01:48

Question

Информатика: Известны средняя скорость движения катера, скорость течения реки и расстояние между двумя пунктами, которое должен преодолеть катер в двух направлениях - туда и обратно. построить таблицу, отражающую зависимость расстояния до цели (на прямом пути и на обратном) от времени движения катера с интервалом в полчаса.

altemirovap0cn54 · Accepted Answer

//PascalABC.Net 3.2 var m, n: integer; a: array of array of integer; procedure zam(a1, b1: integer); begin for var i:=0 to n-1 do begin a[i][a1]+=a[i][b1]; a[i][b1] :=a[i][a1]-a[i][b1]; a[i][a1]-=a[i][b1]; end; end; procedure sortSelekt (); var max: integer; begin for var i:=0 to m-1 do begin max:=i; for var j:=i to m-1 do if a[n-1][max] a[n-1][j] then max:=j; if i max then zam (i, max); end; end; procedure printMAS (); begin for var i:=0 to n-1 do begin for var j:=0 to m-1 do write (a[i][j]:4);...

MOGZ ответил