Дан массив. Все его элементы увеличить на число b. Помогите написать пограмму в паскале

Question

Информатика

Валентион

8 июня, 07:06

Дан массив. Все его элементы увеличить на число b. Помогите написать пограмму в паскале

+5

Ответы (1)

Знаете ответ?

Антонина · Answer 1

Const

N=10 / / размер массива

Type

A=array[1 ... n]of real;

Var

I, B:integer;

Begin

For I=1 to n do

Read (a[i]) ; / / ввели массив

Read (b) ;

For I=1 to n do

Begin

A[i]:=a[i]+b;

Write (a[i]) ;

End

End.