jenek-f
?>

Втаблице dat хранятся положительные и отрицательные целые числа. определите, что будет напечатано в результате выполнения следующего алгоритма. var k, m, num: integer; dat: array[1..10] of integer; begin dat [1] : = 7; dat [2] : = -8; dat [3] : = 3; dat [4] : = 6; dat [5] : = -4; dat [6] : = 3; dat [7] : = 5; dat [8] : = -5; dat [9] : = 7; dat [10] : = 1; num: = 1; m: = dat [1]; for k: = 2 to 10 do begin if dat [k] * m < 0 then begin m : = dat [k]; num : = k end end; write (num); end. решить и объяснить.

Информатика

Ответы

nyuraborova89
Программа выводит номер элемента массива, следующего за последней переменой знака (см. вложение). Перемена знака проверяется условием
Dat [k] * m < 0 - два соседних элемента имеют разные знаки.
Будет выведено значение 9.

Втаблице dat хранятся положительные и отрицательные целые числа. определите, что будет напечатано в
maxim-xx38
1) N -мощность алфавита (кол-во символов в алфавите), находится по формуле N=2^i, где i - информационный вес символа в битах.
32=2^i => i=5 бит

ответ: 5 бит

2) N = 2^i; 16=2^i => i = 4 бит

I (заглавная i) - информационный объём сообщения, находится по формуле:
I = K × i, где K - кол-во символов в сообщении.
I = 50 × 4 = 200 бит

ответ: 200 бит

3) 1/16 мб = 1024 кб × (1/16) = 64 кб = 2^6 кб = 2^16 байт = 2^24 бит

16=2^i => i =4 бит

I = K × i => K = I/i = 2^24/2^2 = 2^22 бита = 2^14 байт = 2^4 кб = 16 кб

ответ: 16 кб

4) 16 = 2^i => i = 4 бит

I = K × i = 384 × 4 = 1536 бит = 1536 ÷ 4 = 192 байт = 192 ÷ 1024 = 0,1875 кб (странгое число, но ладно)

ответ: 0,1875

5) Итак, мощность алфавита до 10 символов. Значит, из формулы N=2^i, i = либо 1, либо 2, либо 3, либо 4. Нам подходит только 2 и 3, так как 3/2 = 1,5, что подходит по условию (учитывая тот факт, что кол-во символов одинаковое, а объём больше в 1,5 раза, то значит и i в первом сообщении больше в 1,5 раза).

N = 2^i
N = 2^3 = 8
N = 2^2 = 4

ответ: в первом алфавите - 8 символов, во втором - 4 символа.
mzia-mzia-60682
1) 1024 байт =1024 байт
1024 байт > 1000 байт
800 байт < 1024 байт
400 бит = 400 бит
8192 байта < 1024 байта
2) 64 бита=64*8 байт=512 байт
3) 64=2^6?   i=6 бит
4) 40 байт
5)11 Кб=11*1024*8 бит
11*1024*8=11264*i     i=(11*1024*8)/11264=8 бит
N=2^8=256
6) 32=2^5? 
i=5
7) N=16   i=4     N=256   i=8     
8/4=2 (в 2 раза)
8) N=16   i=4   k=50   
I=50*4=200 бит
9) N=256   i=8   k=30*70*5   
I=30*70*5*8=84000 бит
10) 1 Мб=1024*1024*8 бит
1/512 Мб=(1024*1024*8)/512=1024*16 бит
1024*16=2048*i        i=(1024*16)/2048=8 бит
N=2^i     
2^8=256
11) N=256   i=8   k=160*192
I=160*192*8 бит
I=(160*192*8)/(1024*8)=30 Кб

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

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

Втаблице dat хранятся положительные и отрицательные целые числа. определите, что будет напечатано в результате выполнения следующего алгоритма. var k, m, num: integer; dat: array[1..10] of integer; begin dat [1] : = 7; dat [2] : = -8; dat [3] : = 3; dat [4] : = 6; dat [5] : = -4; dat [6] : = 3; dat [7] : = 5; dat [8] : = -5; dat [9] : = 7; dat [10] : = 1; num: = 1; m: = dat [1]; for k: = 2 to 10 do begin if dat [k] * m < 0 then begin m : = dat [k]; num : = k end end; write (num); end. решить и объяснить.
Ваше имя (никнейм)*
Email*
Комментарий*

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

kristal1
Александрович784
v-shevlyakov7992
eremenkou
maria
Pirogovskii695
Жуков219
Кислинская1055
oyunabaduraeva
centrprof20
anovikovsr
Igor120
l250sp70
Роман
Rjkjneirbyf555