Определить объем памяти в кбайтах, занимаемый текстом из 60 страниц по 512 символов на каждой странице, если для кодирования 1 символа отводится 8 бит вместе с дано
135
236
Ответы на вопрос:
Program chik; label 1; var a: array[1..1000]of integer; p,w,i,n,min,max,l: integer; begin read(n); for i: =1 to n do begin read(a[i]); end; min: =a[1]; max: =a[1]; for i: =2 to n do begin if(a[i]> max)then begin max: =a[i]; goto 1; end; if(a[i]< min)then min: =a[i]; 1: end; p: =max; l: =min; for i: =1 to n do begin if(a[i]=max)then a[i]: =l; if(a[i]=min)then a[i]: =p; end; for i: =1 to n do begin write(a[i],' '); end; end.
Популярно: Информатика
-
алёчек26.09.2021 22:48
-
Efimenko3426.10.2022 14:56
-
irazatula0505.12.2020 02:33
-
golicinskaya10.05.2020 22:53
-
MrGoudi06.08.2022 12:41
-
fokslov6925.06.2022 14:21
-
serpgo126.10.2021 12:09
-
poli14311.08.2020 23:41
-
Desa1116.04.2020 22:28
-
Ram54312.09.2021 02:47