Запишите еденицы измерения информации в порядке убывания 1кбайт , 1025 байт , 1мбайт , 925 кбайт , 2мбайт
126
182
Ответы на вопрос:
Program n1; const n=5; var a: array[1..n,1..n] of integer; i,max,j: integer; begin randomize; for i: =1 to n do begin for j: =1 to n do begin a[i,j]: =random(100); write(a[i,j],' '); end; writeln; end; max: =a[1,1]; for i: =1 to n do for j: =1 to n do if a[i,j]> max then max: =a[i,j]; write('max=',max); end.
Популярно: Информатика
-
fullwalkgroundEger04.04.2021 13:22
-
Ардак0000000031.05.2020 12:17
-
единорог10607.01.2021 17:14
-
germanlandyshev27.06.2023 03:25
-
alisher090124.10.2020 00:12
-
masha350031.07.2022 11:57
-
КорнелияЧернова07.02.2020 15:58
-
Агаисмаил115.01.2022 05:17
-
tipichnayapanda07.02.2022 02:16
-
aidos0278gmailcom29.09.2021 05:16