Паскаль! дано число. умножить его на 9 (один раз получить сумму его цифр. т.е. доказать, что сумма цифр этого числа будет равна 9. (в первом раскладе или во втором сумма цифр этого числа будет равна 9.)
vara,b: integer; beginreadln(a); a: =a*9; while a< > 9 dobegin
b: =0; while a< > 0 do begin b: =b+a mod 10; a: =a div 10; end; a: =b; end; end.
vitaldicky349
15.04.2020
//полный код procedure f(n: integer); forward; procedure g(n: integer); forward; procedure f(n: integer); begin writeln('*'); if n > 0 then g(n - 1); end; procedure g(n: integer); begin writeln('*'); if n > 1 then f(n - 2); end; begin f(13); end. вывод * * * * * * * * * * походу 10 звездочек
vladexi
15.04.2020
1) log2(64) = 6, на 1 пиксель нужно 6 бит, а всего 6 * 128 * 256 бит = 6 * 16 * 256 байт = 6*4 кб = 24 кб (1 байт = 8 бит, 1 кб = 1024 байт) 2) 5 бит на пиксель, 5 * 128 * 128 бит = 10 кб 3) 7 бит на пиксель, 7 * 64 * 128 бит = 7 кб 4) 8 бит на пиксель, 8 * 64 * 256 бит = 16 кб 5) 7 бит на пиксель, 7 * 32 * 1024 бит = 28 кб 6) 6 бит на пиксель, 6 * 1024 * 512 бит = 384 кб 7) 5 бит на пиксель, 80 кб 8) 4 бита на пиксель, 32 кб 9) 3 бита на пиксель, 12 кб 10) 8 бит на пиксель, 16 кб 11) 24 кб = 24 * 1024 байт = 24 * 1024 * 8 бит, на 1 пиксель приходится (24 * 1024 * 8) / (128 * 256) = 6 бит. по формуле n = 2^i получаем 2^6 = 64 возможных цветов. 12) 10 кб = 10 * 1024 * 8 бит, на 1 пиксель (10 * 1024 * 8) / (128 * 128) = 5 бит на пиксель, 2^5 = 32 цвета. 13) 7 бит на пиксель, 128 цветов 14) 8 бит на пиксель, 256 цветов 15) 7 бит на пиксель, 128 цветов
vara,b: integer; beginreadln(a); a: =a*9; while a< > 9 dobegin
b: =0; while a< > 0 do begin b: =b+a mod 10; a: =a div 10; end; a: =b; end; end.