Есть ответ 👍

Сделайте блок-схему по этому заданию

163
378
Посмотреть ответы 1

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


Var a: array[1..5,1..5]of integer; i,j,ans: integer; begin ans: =a[1,1]; for i: =1 to 5 do begin for j: =1 to 5 do begin read(a[i,j]); if(a[i,j]< ans)then ans: =a[i,j]; end; end; writeln(ans); end.

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