Происхождение слова "алгоритм" связано с алгоритмами десятичной позиционной арифметики. Правила действий с натуральными числами, записанными в десятичной системе счисления, были впервые найдены в средневековой Индии. Европейцы изучали их по книге великого арабского ученого IX в, которого звали Мухаммед ибн Муса аль-Хорезми, что буквально означает "Мухаммед, сын Мусы, уроженец Хорезма" (заметим, что Аральское море тогда называлось "озером Хорезм", а сам город Хорезм был расположен в бассейне реки Амударьи южнее этого моря) . Книга ученого "Китаб ал-хисаб ал-хинд" ("Книга об индийском счете") послужила прототипом многих рукописей, составленных европейцами уже на латинском языке. В них имя ученого – аль-Хорезми – латинизировалось и стало звучать как "алхоризм", "алгорифм" или "алгоритм". Этим словом стали называть сами рукописи о десятичной арифметике и алгоритмы цифровых вычислений, а лишь затем его стали использовать для обозначения произвольных алгоритмов.
Всего символов: 290*39*67=757770 символов.
Если это просто символы типа char кодировки ASCII, то так как char имеет размер 1 байт, то книга занимает 757770 байт, или 757770/8=6062160 бит
Если считать, что больные продолжают ходить в школу, заражая каждый день людей, и при этом они не выздоравливают через 7 дней, то так:
var vsego, boleet,den:integer;
begin
writeln('Сколько всего человек: ');
Readln(vsego);
boleet:=1;
while boleet<vsego do begin
den:=den+1;
boleet:=boleet*4+boleet;
writeln('День ',den, ' - заразились и болеют уже ', boleet, ' человек');
end;
writeln('Всего учеников: ', vsego, ', Через ',den, ' дней заболеют ', boleet, ' учеников (если бы их было столько), но т.к. их столько нет, да и школу бы всё равно на карантин закрыли, то будем считать, что заболеют все ', vsego);
end.
Shift вот эта клавиша за это отвечает