иніорматика - любимій предмет всехученков
DCT NFQYJT CNFYJDBNCZ ZDYSV/ ПРОСТО БЕРЕТЕ И ПО КЛАВИАТУРЕ ИЩЕТЕ ЭТИ БУКВЫ,НО ЧТО - ТО В ПОСЛЕДНЕМ СЛОВЕ НЕ ТАК,ВЫ НАВЕРНО НЕ ПРАВИЛЬНО НАПИСАЛИ
Кажется так, но точно не уверенна
111010
Возможно я не прав но вот
а) 111101
б) 010111
в) 111011010
г) 100000
Var
a,b,k:longint;
begin
b:=1;
k:=0;
while b<10000 do
begin
read(a);
b:=b*a;
k:=k+1;
end;
writeln('Kol:',k);
writeln('Number:',b);
readln
end.