Дан одномерный массив целых чисел,сост.из 14 ячеек,заполн.случайными числами из...

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

Дан одномерный массив целых чисел,сост.из 14 ячеек,заполн.случайными числами из промежутка [-20;50].увелич.каждый элемент массива на 150


Информатика (16 баллов) | 59 просмотров
Дан 1 ответ
0 голосов

Var
a:array[1..14] of integer;
i:integer;
begin
for i:=1 to 14 do
a[i]:=a[i]+1;
readln;
readln;
end.

(76 баллов)
0

спасибо

0

Var
a:array[1..14] of integer;
i:integer;
begin
for i:=1 to 14 do
a[i]:=a[i]+150;
readln;
readln;
end.

0

не дочитал задание...

0

:)