Переведите из паскаля в кумир Program nomer_2;
Var a, i, n, S: integer;
Begin
Write('Vvedite n '); readln(n);
S:=0;
For i:=1 to n do
begin
read(a);
if (a mod 6 =0) then S:=S+a;
end;
Writeln(S);
End.

1) (4*60*64*8)/(8*1024)=15 перемножаем страницы на строки и на символы и на информационный объём 1 символа(сколько символов в рассказе и сколько они занимаю места) мы все нашли в битах, так как нужно в килобайтах делим на 8 бит(те получаем в байтах, и затем на 1024 байт чтобы получить в килобайтах 2)(0,5*1024*8)/256=16 так как нужно узнать информационный объём 1 символа, мы делим информационный объём статьи на количество символов(информационный объём вначале переводим в биты, те домножаем на 1024(получается в байтах) и на 8(теперь в битах) 3) 1 байт=8 бит 80/8=10 символов

1) (4*60*64*8)/(8*1024)=15 перемножаем страницы на строки и на символы и на информационный объём 1 символа(сколько символов в рассказе и сколько они занимаю места) мы все нашли в битах, так как нужно в килобайтах делим на 8 бит(те получаем в байтах, и затем на 1024 байт чтобы получить в килобайтах 2)(0,5*1024*8)/256=16 так как нужно узнать информационный объём 1 символа, мы делим информационный объём статьи на количество символов(информационный объём вначале переводим в биты, те домножаем на 1024(получается в байтах) и на 8(теперь в битах) 3) 1 байт=8 бит 80/8=10 символов