Задача: Дано три вещественных массива. Определить в каком из них находится самый…

Uses crt; Const n=3; varA: array [1… n] of integer; B: array [1… n] of real; C: array [1… n] of real; k1,k2,k3,i: integer; function min (A1: real): real; var j: integer; beginfor j: =1 to n doif A[j]