Много (78) за блок- курсовую сдавать : ( программа на паскале uses crt; type mas=array [1..100] of integer; var b: mas; p, i,n: integer; procedure vvod (x: mas; k: integer); var i, p: integer; begin for i: =1 to n do begin write('vvedite chislo: '); readln(x[i]); end; for i: =1 to n do write(x[i]: 3); for i: =n downto 1 do if x[i]< 0 then p: =i;
writeln; write('= ',x[p-1]); writeln; readln; end; begin clrscr; write('vvedite kol-vo chisel: '); readln((n)); vvod (b, n); readln; end.

цифровая камера сохраняет изображение в цифровом формате на носителях с матрицы. если раньше фотография получалась из-за процессов, то сейчас пленку заменяет карта памяти - матрица заполняет значение каждого элемента-пиксела. таким образом получается растовое изображение.

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

      можно        написать        128.

ответ: 128 байт таких файлов можно записать на носитель.

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

i,s,n,k: integer;

begin

  read(n);

  for i : = 1 to n do begin

      read(a[i]);

      if a[i]> 0 then begin

          s: =s+a[i];

          k: =k+1;

      end;

  end;

  writeln(s, s/k);

end.