ответ:Информационный размер статьи I=k*i, где k-количество символов в статье, i- количество бит на один символ.
1) k=32*40*64= 81920
I= 81920*8= 655360 бит
655360 бит/8= 81920 байт
81920 байт/1024= 80 Кбайт
ответ: 80 Кбайт
2)k=48*40*40= 76800
I=76800*8= 614400 бит
614400 бит/8= 76800 байт
76800 байт/1024= 75 Кбайт
ответ: 75 Кбайт
3)k=64*40*48= 122880
I=122880*8= 983040 бит
983040 бит/8= 122880 байт
122880 байт/1024= 120 Кбайт
ответ: 120 Кбайт
4)k=64*40*64= 163840
I=163840*8= 1310720 бит
1310720 бит/8=163840 байт
163840 байт/1024= 160 Кбайт
ответ: 160 Кбайт
Подробнее - на -
Объяснение:
ответ:Информационный размер статьи I=k*i, где k-количество символов в статье, i- количество бит на один символ.
1) k=32*40*64= 81920
I= 81920*8= 655360 бит
655360 бит/8= 81920 байт
81920 байт/1024= 80 Кбайт
ответ: 80 Кбайт
2)k=48*40*40= 76800
I=76800*8= 614400 бит
614400 бит/8= 76800 байт
76800 байт/1024= 75 Кбайт
ответ: 75 Кбайт
3)k=64*40*48= 122880
I=122880*8= 983040 бит
983040 бит/8= 122880 байт
122880 байт/1024= 120 Кбайт
ответ: 120 Кбайт
4)k=64*40*64= 163840
I=163840*8= 1310720 бит
1310720 бит/8=163840 байт
163840 байт/1024= 160 Кбайт
ответ: 160 Кбайт
Подробнее - на -
Объяснение:
// Внимание! Если программа не работает, обновите версию!
procedure Love(n:integer);
begin
Writeln(n*('Я люблю ПАСКАЛЬ'+NewLine))
end;
begin
Love(ReadInteger('n='))
end.
Пример
n= 5
Я люблю ПАСКАЛЬ
Я люблю ПАСКАЛЬ
Я люблю ПАСКАЛЬ
Я люблю ПАСКАЛЬ
Я люблю ПАСКАЛЬ
// PascalABC.NET 3.2, сборка 1362 от 14.12.2016
// Внимание! Если программа не работает, обновите версию!
procedure LinEqu(a,b:real);
begin
if a=0 then
if b=0 then Writeln('Решений бесконечно много')
else Writeln('решений нет')
else Writeln('x=',-b/a)
end;
begin
var a,b:real;
Write('Введите а и b: '); Read(a,b);
LinEqu(a,b)
end.
Пример
Введите а и b: 18.45 -12
x=0.650406504065041