Предмет: Информатика, автор: nactyafrolova2

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

Ответы

Автор ответа: ho8ot
0
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. 
Похожие вопросы