Program n_1;
var n,i,s:integer;
begin
s:=0;
readln(n);
for i:=1 to n do
begin
if (n mod i)=0 then s:=s+1
end;
writeln(s)
end.
Будущего не будет. Мы все умрём в агонии и муках.
2) 500 Кбайт / 2500 байт =500*1024 байт / 2500 байт =204.8
Ответ 204 (страницы)
3) 1.44 Мбайт / (60*55* 8 бит)= 1.44 *1024*1024 * 8 бит / (60*55*8) =457.6 =456 страниц
4) I =8 бит * 50*60*55=1320000 бит =165000 байт =161.1 Кбайт
5) 8 букв значит 8 байт (одна буква имеет 8 бит=1 байт)
100 div 5 = 20
__________________________________________