Задание:
В двумерном массиве, введеном случайными числами найти минимальное и максимальное значения, их номера и поменять их местами.! ПОМОГИТЕПОЖАЛУЙСТА!
Решение:
program pr1; varm: array[1… 100,1… 100] of integer; i,j,a,b,max,min,k,n,z: integer; beginrandomize; max: =0; min: =100; for i: =1 to 4 dofor j: =1 to 4 dom[i,j]: =random (100); for i: =1 to 4 dofor j: =1 to 4 dobeginwriteln (m[i,j]); if m[i,j]>=max then begin max: =m[i,j]; k: =i; n: =j; end; if m[i,j] <= min then begin min: =m[i,j]; a: =i; b: =j; end; end; z: =m[k,n]; m[k,n]: =m[a,b]; m[a,b]: =z; writeln ('); for i: =1 to 4 dofor j: =1 to 4 dowriteln (m[i,j]); readln; end. Колличество элементов массива и диапазон рандома выбери сама
Знаете другой ответ?