. Ақпараттың өлшем бірлігі не үшін керек? Бит дегеніміз не? Байт, килобайт, мегабайт және гигабайт дегеніміз - id1361930920200924 от фирдавс6 24.09.2020 23:15

Question

Информатика: . Ақпараттың өлшем бірлігі не үшін керек? Бит дегеніміз не? Байт, килобайт, мегабайт және гигабайт дегеніміз не? Өлшем бірліктер өзара қалай байланысты? Берілген ақпараттың өлшем бірліктерін өсу реті бойынша орналастырың- дар: Tбайт; Кбайт; байт; Мбайт; Гбайт.​

фирдавс6 · Accepted Answer

// дан массив Q(15) , заполненный числами [0,100].Найдите количество чётных чисел и их сумму
Var Q : array [1..15] of byte;
i,n : byte;
s : word;
begin
randomize;
for i:=1 to 15 do
begin
Q[i]:=random(101); //заполняем массив случайными числами
end;
for i:=1 to 15 do
begin
if (Q[i]mod 2=0) then //определяем четные чиcла
begin
n:=n+1; //высчитываем их количество
s:=s+Q[i]; //и сумму
end;
end;
writeln ('в данном массиве ',n,' четных чисел. Их сумма равна ',s)
end.

Первый и второй циклы можно объединить (я так делал для наглядности)

MOGZ ответил