Var
i,N,A,k:integer;
Begin
k:=0;
Write('N = ');Read(N);
For i:= 1 to N do
Begin
Read(A);
if (A mod 10 = 8) then k:=k+1;
End;
WriteLn(k);
End.
а1 = 100
аn = 990
n = 90
S = (100+990)*90/2 = решишь сам))
Ответ:
4) 25 кБ
Объяснение:
Общее число символов на странице - 32 * 25 = 800;
Общее число символов в статье - 800 * 32 = 25600;
Информационный объем статьи - 25600 * 8 = 204800 бит,
204800 / (8 * 1024) = 25 кБ
Шаг 1: I=1, S=S+I=0+1=1
шаг 2: I=2, S=1+2=3
Тело цикла: S:=S+I
S=3