Предмет: Информатика,
автор: elko1
составьте программу на языке Паскаль, которая формирует массив C из 20 случайных целых чисел в промежутке [-64;87], и выводит сумму всех элементов этого массива.
Ответы
Автор ответа:
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
Предмет: Українська мова,
автор: Наталя2508
Предмет: Русский язык,
автор: Валентин255
Предмет: Қазақ тiлi,
автор: ААпельсин228
Предмет: Русский язык,
автор: Magaadzhiev