Дано действительное число a и натуральное число n. вычислить: a*(a+1)**(a+n-1);

program funct1;  

uses crt;  

var a,rez: real;

        i,n: integer;

begin

      clrscr;

      write('введите а: ');

      readln(a);  

      write('введите n: ');

      readln(a);

      rez: =a;

      for i: =1 to n-1 do rez: =rez*(a+i);

      writeln('произведение ряда: ',rez: 5: 5);  

    readkey;

 

end. 

 

 

1) 2162 – mmclxii mcmxlii – 1942ответ: г) 2) количество цветов определяется по размеру выделенной памяти на один пиксель, следовательно,   пикселей в изображении и 64(байта) = 512 (битам). итого получается на 1 пиксель   (бита) информации, чего хватает для хранения 4 значений цветов ( ). ответ: б) 4 3) учитель получатель информации. ответ: г) 4) дано: количество пикселей    (пикселей), время t=64 (сек) начну с того, что сама не верна, либо в ней была опечатка. обосную, даже если мы возьмём максимальное количество цветов на один пиксель, предложенных в ответах, а это 256. мы получим, что на 1 пиксель требуется p=8 (бит)=1 (байт) (2^{8}=256) памяти, а объём v изображения равен  (байт)=64(кбайт), т.е. скорость при заданных параметрах будет равна 1 кбайт/с, но ни как не 8 мбит/с.

Begin   var max : = 0;   var n : = readinteger('введите n: ');   write('введите n чисел: ');   for var i : = 1 to n do   begin     var a : = readinteger();     if(a.tostring.length > 1) then         if(a.tostring[a.tostring.length - 1] = '0') then           if(a > max) then max : = a;   end;     if(max = 0) then write('нет таких чисел.')     else write(max); end.