Массив из 10 элементов. Формируется случайным образом из интервала [-35,25]. Составьте программу умньшения всех элементов массива на 16.

Question

Информатика

Ермил

6 октября, 05:34

Массив из 10 элементов. Формируется случайным образом из интервала [-35,25]. Составьте программу умньшения всех элементов массива на 16.

+5

Ответы (1)

Знаете ответ на вопрос?

Венуста · Answer 1

Uses crt;

var a:array[1 ... 10] of integer;

i:integer;

begin

randomize;

for i:=1 to 10 do

begin

a[i]:=random (61) - 35;

write (a[i]:4) ;

end;

writeln;

for i:=1 to 10 do

begin

write (a[i]-16:4) ;

end;

end.