1монитор работает с 16- цветной палитрой в режиме 640х400 пикселей. для кодирования изображения требуется 1250 кбайт. сколько страниц видеопамяти оно занимает. 2 сколько цветов можно максимально использовать для хранения изображения 850х200 пикселей, если объем страницы видеопамяти 65 кбайт.

1)       16 = 2^4   >     4 бита для одного пикселя монитор - одна страница видеопамяти: 640*400*4 =(640)*(1600)  =(5*2^7) * (25*2^6) =  125*2^13 (битов)= =125 (кбайтов) изображение: 1250: 125 = 10 (страниц)         ответ 10 2)   (65*2^13   битов )   :   (850*200)  = (65*8*1024) : (850*200) = =532  480 : 170 000 =3,13≈     4 бита 1 пиксель 2^4 =16 цветов                       ответ 16

5) program gt5; var n,k: integer; begin k: =0; while n> 0 do begin n: =n div 10; k: =k+1; end; writeln(k); end. 3) program gt3; var s,i: integer; begin s: =0; for i: =1 to 100 do begin if(i mod 2=0)then s: =s+i; end; writeln(s); end. 2) program gt2; var k,i: integer; begin k: =0; for i: =11 to 20 do begin if(i mod 2=1)then k: =k+1; end; writeln(k); end. 1) program gt1; var  x,y: real; begin x: =-3.1; while x< 1 do begin x: =x+0.1; y: = 4*x*x*x-2*x*x+5; writeln(y); end; end.про 4 я не  понял поэтому не  смог решит

Program vtor_bukva; var   s: string; begin   writeln('введите исходное предложение: ');   readln(s);   delete(s, pos(' ', s), 1);   write('последняя буква второго слова=');   if pos(' ', s) < > 0 then write(s[pos(' ', s) - 1])   else write(s[length(s)]);   readln(s); end. твоя программа выводит символ, стоящий перед первым пробелом. а нужно, чтобы выводила символ, стоящий перед вторым пробелом. не стоит забывать, что второго пробела может и не быть. так что, я удаляю первый пробел. а потом делаю проверку: есть ли ещё пробелы (if pos(' ', s) < > 0)? если пробелы есть, то программа выводит букву, следующую перед вторым пробелом (или последнюю букву второго слова). если пробелов нет (всего два слова в предложении было введено), то программа выводит последнюю букву (s[length(s)]). если что-то не понятно, в лс.