khadisovam9
?>

1)в программе «: =» обозначает оператор присваивания, знаки «+», «–», «*» и «/» – соответственно операции сложения, вычитания, умножения и деления. правила выполнения операций и порядок действий соответствует правилам арифметики. определите значение переменной b после выполнения алгоритма b: =15 a: =2 a: =b div a-5 b: =3*b-b mod a 2) определите что будет напечатано в результате работы следующей программы var s, k: integer; begin s : = 1 ; for k: = 1 to 7 do s : = s*2 ; writeln (s); end.

Информатика

Ответы

vadimpopov88
Var s,sgn,eps: real;     i: integer; begin   write('точность вычислений: ');   readln(eps);   s: =1;   sgn: =  -1;   i: =3;   repeat     s: =s+sgn/  i;     sgn: =  -  sgn;     i: =i+2;   until 8/i< eps;   writeln('число пи:   ',s*4);   writeln('точное значение пи: ',pi); end.     точность вычислений: 1.0e-6 число пи:   3.14159240358966 точное значение пи: 3.14159265358979
Kamil
1) определяем общее количество бит: 16 х 640 х 480 = 4 915 200 с учетом того, что в байте 8 бит, а 1 кб=1024 б получим 4 915 200 / 8 / 1024 = 600 (кб) 2) определяем общее количество бит с учетом того, что в палитре true color для цвета отводится 24 бита: 1600 х 1200 х 24 = 46 080 000 (бит). после преобразования файла для интернет он будет представлен в восьмибитной палитре ( 256 = 2⁸ ) и займет объем 1400 х 900 х 256 = 10 080 000 (бит). разница в объемах составит  46 080 000 -  10 080 000 = 36 000 000 бит. с учетом того, что в байте 8 бит, а в мегабайте 1024 х 1024 байт получим, что пространство на диске сократиться на 36 000 000 / (8 х 1024 х 1024) ≈ 4.29 (мб)

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

1)в программе «: =» обозначает оператор присваивания, знаки «+», «–», «*» и «/» – соответственно операции сложения, вычитания, умножения и деления. правила выполнения операций и порядок действий соответствует правилам арифметики. определите значение переменной b после выполнения алгоритма b: =15 a: =2 a: =b div a-5 b: =3*b-b mod a 2) определите что будет напечатано в результате работы следующей программы var s, k: integer; begin s : = 1 ; for k: = 1 to 7 do s : = s*2 ; writeln (s); end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Lopatkin_Shchepak174
Ивлев1508
madjk
ambstroy
LYuBOV
batalerka391
ashybasaida-33
lenalevmax7937
kuhonka2021
asparinapti39
Abdullaev
Aleksei
liza04521160
Shevchenko
Екатерина