Заполните целочисленный массив а размерностью 10 элементов по формуле 2 + 3m, где m — порядковый номер элемента массива, и выведите его на экран монитора в одну строку. сохраните программу и оправьте на проверку учителю.

Var a: array[1..10] of integer; m: integer; begin for m: =1 to 10 do begin; a[m]: =2+3*m; writeln(a[m]); end; end.

Var   a: array[10] of integer;   i: integer; begin   for i : = 1 to 10 do     a[i] = 2 + 3*i;   for i : = 1 to 9 do     write(a[i], ' ');   writeln(a[10]); end.

Оформление важнее содержания

Для более качественного обмена данными одновременно осуществляется кодирование и обработка информации на стороне передатчика (подготовка данных и преобразование их в форму, удобную для трансляции, обработки и хранения), пересылка и декодирование на стороне приемника (преобразование кодированных данных в исходную форму). Это взаимосвязанные задачи: источник и приемник должны обладать сходными алгоритмами обработки сведений, иначе процесс кодирования-декодирования будет невозможен. Кодирование и обработка графической и мультимедийной информации обычно реализуются на основе вычислительной техники. - Читайте подробнее на FB.ru: http://fb.ru/article/236949/chto-takoe-kodirovanie-informatsii-i-ee-obrabotka#image856

Var   i, max,min: integer;  mas:array[1..12] of integer;begin  for i := 1 to 12 do    read(mas[i]);  max:=mas[1];  min:=mas[1];  for i:=1 to 12 do  begin  if mas[i] > max then max:=mas[i];  if mas[i] < min then min:=mas[i];  end;  write(max,,min);end.