Поделитесь своими знаниями, ответьте на вопрос:
Оператор цикла FOR Вариант 4 2. Сколько раз будет выполнен цикл: x:=5; for i:=-1 to 5 do x:=x+1; 3. Сколько раз будет выполнен цикл и что будет выведено на печать? var k, i: integer; begin k:=0; for i:=-10 to -9 do k: =i; write (k) ; end. 4. Определите, что будет напечатано в результате выполнения следующего фрагмента программы: var k, s: integer; begin s:=2; for k:=5 to 12 do s:=s+k; write (s) ; end. 5. Определить значение переменной s после выполнения следующего фрагмента программы: Var s; real; i : integer; begin s := 0; for i := 1 to 4 do begin s := s*10 ; s := s + I end; end. 6. Что выведется на экран в результате выполнения фрагмента программы: s:=0; for j:=10 to 15 s:=s+2*j; writeln(s); 7. Что выведется на экран в результате выполнения программы: for I:=1 5 do begin A:=2*1+1; B:=4*I; end; WRITELN(A, B); 8. Что выведется на экран в результате выполнения программы: for I:=5 downto 1 do BEGIN A:=3*1+1; B:=4*I end; writeln(a, b); 9. Написать программу, которая печатает в столбик следующие числа: 2.1 2.2 2.3 … 2.8.
2) 50*80*(ln(16)/ln(2)) = 16000 бит; 16000 / 8 = 2000 байт.
3) 64*64*(ln(256)/ln(2)) = 32768 бит / 8 / 1024 = 4 кбайт минимум.
4) 2048*1536*3 байт пиксель = 9437184 байт / 8 / 1024 = 1152 кбайт.
5) (ln(256)/ln(2)) / (ln(2)/ln(2)) =8 раз меньше стал; (текущий уменьшенный вес файла + 70 байт) * 8 =~ 560 байт если весил 1 байт.
6) (ln(64)/ln(2)) / (ln(8)/ln(2)) = 2 раза.
7) (ln(1024)/ln(2)) / (ln(32)/ln(2)) = 2 раза.
8) 32*64/8 = 256; 512 байт / 256 = 2 бит пикс; 2^2 = 4 цветов.
9) 128*128/8/1024 = 2; 4 кб / 2 = 2 бит пикс; 2^2 = 4 цветов.
10) 1024*768*16 бит пикс = 12582912 бит / 8 / 1024 / 1024 = 1,5 мбайт.
11) 1024*512/8/1024 = 64; 256 кб / 64 = 4 бит пикс; 2^4 = 16 цветов.
12) 32*128*(ln(64)/ln(2)) бит = 24576 бит / 8 / 1024 = 3 кбайта.
13) 2^24 = 16 777 216 цветов; 1240*1024*(ln(16777216)/ln(2)) бит пикс = 30474240 бит / 8 / 1024 = 3720 кбайт для одной страницы требуется.