2 в 16 степени = 65 536 цветов
2 в 8 степени = 256 цветов
2 в 4 степени = 16 цветов
Var money:integer;
min:real;
s:string;
begin
write('Стоимость одной минуты разговора = ');
readln(money);
write('Длительность разговора = ');
readln(min);
write('Какой сегодня день? ');
readln(s);
if (s = 'суббота') or (s = 'Суббота') or (s = 'Воскресенье') or (s = 'воскресенье') then writeln('Стоимость разговора = ',money * min*0.8)
else writeln('Стоимость разговора = ',money*min);
end.
40 строк *60 символов = 2400 символов на одной странице
8 бит = 1 байт
16 Гб= 16* 1024 Мб= 16*1024*1024 кб=16*1024*1024*1024 байт = 17179869184 байта
17179869184 / 2400 = 715878,8 страниц
715878,8 /100 =71583 см
Кажется, так.
Подробнее - на Znanija.com - znanija.com/task/8906879#readmore
<span>f(int n)
{
if (n == 1)
return 1;
return f(n - 1) * n;
<span>}
Факториал </span></span>
1 : наливаем воду в 4 литровый сосуд
2 : выливаем из 4 в 5
3: набираем еще один 4л сосуд и сливаем из 4 в 5 под завязку
5. Таким образом имеем 3 литра в 4л сосуде
4: Освобождаем 5л сосуд и сливаем в него воду из 4л. Таким
образом имеем пустой 4л сосуд и 3 литра воду в 5л емкости.
5: набираем полный 4л сосуд и сливаем в 5л емкость(в которой
уже 3 литра). В итоге у нас остается 2 литра воды в 4 литровом сосуде.