<span>65- кол-во вариантов результата (32 + 32 +1)
2 в 6 степени<65<2 в 7 степени
i=7
40960*7=286720 бит</span>
Странно, что решили только одну задачу. Они ведь все однотипные.
2.
Количество символов в статье = 28*72*48
Объем статьи:
28*72*48*16 бит = 28*72*48*16/8 байт = 28*72*48*2/1024 Кбайт = 189 Кбайт
3.
Количество символов в докладе = 8*32*64
Объем доклада:
8*32*64*16 бит = 8*32*64*16/8 байт = 8*32*64*2/1024 Кбайт = 32 Кбайта
4.
Количество символов в рассказе = 4*48*64
Объем рассказа = 4*48*64*8 бит = 4*48*64 байт = 4*48*64/1024 Кбайт = 12 Кбайт
5.
В предложении 47 символов.
Объем = 48*16 бит = 47*16/8 байт = 64 байта
Program enot;
VAR p:real;
i,n:integer;
BEGIN
p:=1;
read(n);
for i:= n downto 1 do
p:= p*i;
writeln(p:4:2);
<span> end.</span>
Ответ:
1) 1 Тбайт
2) 0,5 Мбайт
3)500 Кбайт
4)1600 байт
program raf105;
var
a,b,c,sum,pro: real;
begin
write('Введите 3 вещественных числа: ');
readln(a,b,c);
sum:= a+b+c;
pro:= a*b*c;
if sum > pro
then writeln('Сумма больше произведения')
else if pro > sum
then writeln('Произведение больше суммы')
else writeln('Сумма и произведение равны');
end.
<h3><u>PascalABC 3.4.2</u></h3>