Монография, набранная на компьютере, содержит 2048 страниц, на каждой странице 48 строк, в каждой строке - id2140406920221112 от lenyaalikin 12.11.2022 03:53

Question

Информатика: Монография, набранная на компьютере, содержит 2048 страниц, на каждой странице 48 строк, в каждой строке 72 символа. Для кодирования символов используется кодировка Unicode, при которой каждый символ кодируется 16 битами. Определите информационный обьем монографии 1) 1 байт 2) 5,2 Кбайта 3) 10,3 Кбайта 4) 13,5 Мбайта

lenyaalikin · Accepted Answer

program raf105;

const

n= 4; //Размер матрицы (кол-во и длинна строк). Можно менять

var

a:array[1..n,1..n] of integer;

asum:array[1..n] of integer;

i,j,k,sum,kolsum: integer;

x: boolean;

begin

write('Введите число k (не больше ',n,'): ');

readln(k);

for i:=1 to n do

begin

writeln;

writeln('Введите ',n,' чис. ',i,' стр.');

for j:=1 to n do

readln(a[i,j]);

end;

writeln;

writeln('Суммы элементов тех строк, в которых первые ',k,' элем. положительные');

for i:=1 to n do

begin

x:= true;

sum:= 0;

for j:=1 to k do

begin

if x and (a[i,j] <= 0)

then x:= false;

end;

if x

then

begin

for j:=1 to n do

sum+= a[i,j];

kolsum+= 1;

asum[kolsum]:= sum;

writeln(asum[kolsum]);

end;

end.

MOGZ ответил