Дан массив из n элементов. написать программу увеличивающую все элементы на 3.

Question

Информатика

Андрон

6 ноября, 22:37

Дан массив из n элементов. написать программу увеличивающую все элементы на 3.

+3

Ответы (1)

Знаете ответ на вопрос?

Рувим · Answer 1

Program keke;

const n=5;

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

i:integer;

begin

For i: = 1 to n do

readln (a[i]) ;

FOr i: = 1 to n do

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

for i: = 1 to n do

writeln (a[i]) ;

readln;

end.