Var f: array[1..10] of integer; i,suma,sumb:integer; begin randomize; for i:=1 to 10 do begin f[i]:=random(10)+10; write(f[i],' '); end; suma:=0; sumb:=0; for i:= 1 to 10 do if f[i] mod 2 = 0 then suma:=suma+f[i]; else sumb:sumb+f[i]; writeln('Сумма четных: ',suma); writeln('Сумма нечетных: ',sumb); end.
var f: array[1..8] of integer; i,k,sumb:integer; begin randomize; for i:=1 to 8 do begin f[i]:=random(10)+10; write(f[i],' '); end; k:=0; sumb:=0; for i:= 1 to 8 do if f[i] mod 2 = 0 then k:=k+1; else sumb:sumb+f[i]; writeln('Количество четных: ',k); writeln('Сумма нечетных: ',sumb); end.
4. Загрузка компьютера — это подключение компьютера к работе (каждый раз, когда вы включаете компьютер, происходит его загрузка).
Во время загрузки компьютера произошёл сбой.
5. Загрузка файла, программы — это процесс копирования файла, программы (из сети или с диска) на диск данного компьютера, чтобы он был доступен для работы.
Новая программа при загрузке может наложиться на предыдущую программу.
6. Загрузка компьютера, системы — это объём задач, выполняемых в данный момент компьютером, системой.
Сейчас нужно наметить работу, интенсивно использующую процессор, на то время, когда загрузка системы невелика. Я не очень поняла твой вопрос, но это то что хоть как то связано со словом интернет.
print("1*6=6, 2*6=12, 3*6=18, 4*6=24, 5*6=30, 6*6=36, 7*6=42, 8*6=48, 9*6=54")
это ?
Удалите если я не понял задания.