512*384*32/1024/8 КБ, т.е. 768 КБ или 0,75 МБ или 6 Мб
Var
c:array [1..20] of integer;
i,n:integer;
Begin
randomize;
for i:=1 to 20 do
c[i]:=random(50);
for i:=1 to 20 do
write(c[i],' ');
for i:=1 to 20 do
if c[i] mod 5=0 then n:=n+c[i];
writeln;
writeln('Сумма: ',n);
<span>End.</span>
0 раздели на 2.Чему будет равно?
А div - просто убирает остаток.
Например 10 div 3 будет 3,33, а компилятор тебе покажет просто 3.
1.принтер
5.монитор
2.наушники,10.акустические колонки -устройства вывода звуковой информации.