Дан массив из целых чисел А(5,5). Найти минимальный положительный элемент.
Дан массив из целых чисел А(5,5). Найти минимальный положительный элемент.
Гость
Ответ(ы) на вопрос:
Гость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]
Не нашли ответ?
Похожие вопросы