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

Question

Информатика

Харлампий

13 сентября, 08:30

Дан массив из 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.