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

Хех, показалось что это я случайно сделал такие красивые отступы. Моё уважение.

Дело привычки. Без кодстайла совместный проект на 10k+ не напишешь.

* строк

var a:array[1..10] of integer;m:integer;beginfor m:=1 to 10 dobegin;a[m]:=2+3*m;writeln(a[m]);end;end.