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

0 голосов
68 просмотров

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


Информатика (16 баллов) | 68 просмотров
0

двумерный?

Дан 1 ответ
0 голосов

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.

(128 баллов)