Question

На языке программирования Паскаль составить программу вывода на экран 7 элементов целочисленного массива сформированного по формуле: a[k] = – 2k + 12

Answer 1

program arrayFormula;

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

k: integer;

begin

for k := 1 to 7 do

a[k] := -2 * k + 12;

for k := 1 to 7 do

writeln(a[k]);

end.