Сделать блок-схему для этого кода : var a: array [1..10] of integer; i: integer; max: byte; counter: integer; begin max: =0; for i: =1 to 10 do begin a[i]: =random(15); write(a[i], ' '); end; writeln; for i: =1 to 10 do if a[i] > max then begin max: =a[i]; counter: =i; end; writeln('максимальный порядок массива: ', max); writeln('его порядковый номер: ', counter); end.

slava4В    3   03.06.2019 16:26    3