Ввести одномерный массив состоящий из 11 элементов. Определить в нем сумму элементов, стоящих на позициях, чей номер больше его заявленной в нем значение сделать.

program p1;

uses crt;   вывод окошка

const N = 30;

var a: array [1..N] of integer;

i, max, max2 :integer;

begin

 

 for i:=1 to N do begin  вывод элементов массива с рандома

a[i]:=  random (100);

 write( a[i]:4);

 end;

         writeln;

   max:= a[1];  принимаем первый элемент массива за макс

   max2:= a[1];  принимаем первый элемент массива за макс

   

  for i:=1 to N do begin              находим первый max                                                                  

    if  max<a[i] then

      max:= a[i];

      end;

       

      for i:=1 to N do begin                            находим второй max2

        if (max2<a[i]) and ( a[i]<> max) then

         max2:= a[i];

         end;

         

         writeln('max=',max);

         writeln('max2=',max2);

         end.

Принтер, создаёт изображение на бумаге из отдельных маленьких точек ударным Печать на бумаге в матричных принтерах осуществляется при блока иголочек, приводимых в движение электромагнитами. Иголочки, ударяя по бумаге через красящую ленту, оставляют на бумаге точки. Затем блок с иголочками перемешается на некоторое расстояние и процесс повторяется. Так как расстояние между такими точками невелико, то в результате на бумаге получается изображение нужного символа или картинки.
Выпускаются принтеры с 9, 18, 24 и 36 иголками в головке. Разрешающая печати, а также скорость печати графических изображений напрямую зависят от числа иголок. Наибольшее распространение получили 9- и 24-игольчатые принтеры. Принтеры с 9 и кратным 9 количеством игл (18, 36) предназначены для скоростной печати, в то время как 24-игольчатые для качественной печати.