Есть ответ 👍

сделать любую блок схему

136
442
Посмотреть ответы 2

Ответы на вопрос:


Вот, если нужна именно блок схемы


сделать любую блок схему
сделать любую блок схему
сделать любую блок схему

program asd;

uses crt;

var a: array [1..100] of integer;

    n,k, i,max: integer;

begin

writeln ('размер массива');

readln (n);

for i: =1 to n do

begin

readln (a[i]);

if a[i]> =max

then begin

        max: =a[i];

        k: =i;

      end;

end;

writeln (k);

end.

Популярно: Информатика