var i, j, min, min_i, min_j: integer; a: array[1..5, 1..5] of integer;
begin for i : = 1 to 5 do begin for j : = 1 to 5 do begin a[i, j] : = random(100) + 1; write(a[i, j]: 4); end; writeln; end; min : = 999; for i : = 1 to 5 do for j : = 1 to 5 do if min > a[i, j] then begin min : = a[i, j]; min_i : = i; min_j : = j; end; a[min_i, min_j] : = 0; writeln('массив с замененным минимальным элементом'); for i : = 1 to 5 do begin for j : = 1 to 5 do write(a[i, j]: 4); writeln; end; end.
Ответ дал: Гость
а) наличие электромагнитного излучения, сrt
б) ухудшение качества изображения при изменении угла обзора, lcd
в) компактные размеры lcd
г) достаточно сильное ухудшение качества изображения при изменении рекомендуемой производителем разрешающей способности crt lcd
д) формирование изображения с лучей электронных пушек, crt
е) меньший вред для здоровья человека при работе. lcd
Популярные вопросы