Запрашивается возраст человека и сообщается сколько ему осталось до пенсии либо что он уже пенсионер (63) Создайте трессировачную таблицу
251
272
Ответы на вопрос:
Var c: array[1..1000,1..1000] of integer; i,j,n,m,sum,aver: longint; begin read(n,m); for i: =1 to n do for j: =1 to m do begin read(c[i,j]); sum: =sum+c[i,k]; end; aver: =sum div (n*m); for i: =1 to n do begin writeln; for j: =1 to m do begin if c[i,j]< aver then c[i,j]: =0 else c[i,j]: =255; write(c[i,j],' '); end; end; end. проверьте на синтаксические ошибки. в данный момент не могу сам это скомпилировать
Популярно: Информатика
-
книга6705.08.2022 13:23
-
yana0707200513.07.2020 16:59
-
yalex83p0a2c705.08.2020 06:56
-
mariael1029.03.2023 17:33
-
ольга164604.02.2022 00:19
-
orliniyglassoyccc029.03.2023 19:10
-
Нура19104.09.2021 17:48
-
zzzzmi07.12.2020 19:26
-
xeniaverner14.05.2021 02:22
-
milana051212.01.2020 14:05