а1 = 100
аn = 990
n = 90
S = (100+990)*90/2 = решишь сам))
1) жесткий диск ссд озу
2) современный дисковод
3)в прооцесоре
3) 45
4)
Program z4; Var b,a,i,m:integer; Begin read(b);for i:=1 to b do beginread(a);if a>0 and (a mod 2 = 0 )then m:=m+a; end;writeln(m);End.