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

составьте программу на языке Паскаль, которая формирует массив C из 20 случайных целых чисел в промежутке [-64;87], и выводит сумму всех элементов этого массива.

Ответы

Автор ответа: 03090d
1

program m1 ;

var i , x : integer ;

C: array[0..20] of integer;

begin

randomize;

x := 0 ;

for i := 1 to 20 do

C[i] := random(152) - 64 ;

for i := 1 to 20 do

writeln(C[i]) ;

for i := 1 to 20 do

x := x + C[i] ;

write(x);

end.

Похожие вопросы
Предмет: Другие предметы, автор: седа15
Предмет: Қазақ тiлi, автор: ААпельсин228
Предмет: Русский язык, автор: Magaadzhiev