Ввести масив з десяти елементів та знайти суму і добуток

// pascalabc.net 3.3, сборка 1633 от 10.02.2018 // внимание! если программа не работает, обновите версию! №1 begin   var x: =readreal('x=');   var y: =sqr((1-x*x+5*sqr(x*;   writeln('y=',y) end. пример x= 4.12 y=2029704.2032886 2a.   begin   var x: =readreal('x=');   var t1: =x*x; // x^2   var t2: =t1*t1; // x^4   t2: =t2*t2; // x^8   t1: =t2*t1; // x^10   writeln('x^10=',t1) end. 2b. begin   var x: =readreal('x=');   var t: =x*x; // x^2   t: =t*t; // x^4   t: =t*t; // x^8   t: =t*t; // x^16   t: =t/x; // x^15   writeln('x^15=',t) end.

1. 1600 кбайт = 1600*1024 байт = 1600*1024*8 бит глубина цвета = 1600*1024*8 / (1280*1024) бит = 10 бит ответ: 10 бит 2.  для хранения одного из 1024 цветов требуется log(2)1024=10 бит (2^10=1024). необходимый объем памяти = 1024*512*10 бит = 1024*512*10 / (8*1024) кбайт = 640 кбайт ответ: 600 кбайт < 640 кбайт  ⇒ памяти недостаточно 3. для хранения одного из 256 цветов требуется log(2)256=8 бит = 1 байт (2^8=256). объем одной страницы = 1280*1024*1 байт. 2560 кбайт = 2560*1024 байт количество страниц = 2560*1024 / (1280*1024) = 2 ответ: 2