100000 + 30000 + 8000 + 10
30000 + 5000 + 700 + 10
100 + 20 + 5 + 0.4 + 0.09 + 0.001
Грузовой автомобиль проехал большее расторжение
ответ: грузовой
<span>Задача №1 (( остальные по аналогии сделай ))
const n=3;var a:array[1..n,1..n] of integer; {Ввод массива N на N} i, j, sum: integer; {Ввод переменных}begin sum := 0; begin for i:= 1 to n do for j:= 1 to n do read(a[i,j]) end; for i:= 1 to n do begin for j:= 1 to n do if a[i,j] > 0 then sum:=sum + a[i,j] end; write('сумма = ', sum);end.</span>