Соберите программу на языке паскаль. вывести на экран сумму цифр целого числа m> 0

Begin  write('введите целое положительное число m: ');   var m : = readinteger;   assert(m > 0);     var s : = 0;   while m > 0 do  begin    s += m mod 10;     m : = m div 10;   end;     writeln('сумма цифр числа m равна ', s); end.

80 * 60 = 4800 символов на 1 странице

4800 * 450 = 2160000 символов в книге

обычно 1 символ кодируется 1 байтом информации, значит

в книге 2160000 байт, переведем их в мегабайты

2160000 : 1024 = 2109,375 кб (килобайт)

2109,375 : 1024 = 2,06 мб (мегабайт)

следовательно рукопись на 1 дискету не поместится, для нее необходимо 2 дискеты.

 

1. 0,25 кбайт=256 байт = 2048 бит

2. каждый символ - 8 бит

3. 2048/8=256 символов