100(C) 011(A) 01(E) 10(B) 110(D). Ответ - 3.
Возьми слово переписка
подбирай слова такие чтобы в них была буква п е р е п и с к а.
все!
Begin
Writeln(20,' ',25);
Writeln(20); Writeln(25)
end.
Program sr_arifm;
var N,s, sa, cifra: integer;<span>
begin
</span>write(‘N=’);
readln (N);
i:=0;
s:=0;
while N>=0 do
begin
cifra:=n mod 10;
i:=i+1;
if (i = 2) or (i=5) then s:=s+cifra;
n:= n div 10;
end;
sa:=s/2;
writeln (‘sa=’, sa);
end.