Question

Дан массив из 7 элементов целых чисел, увеличить каждый элемент на 3, получившийся массив вывести на экран. Паскаль

Answer 1

program HelloWorld;

var a:Array [1..7] of integer;

var i:integer;

begin

//Тут присваиваешь значения элементам массива например: a[0]:=1;

For i:=1 to 7 do

begin

a[i]:=a[i]+3;

writeln(a[i]);

end;

end.