1. Составьте программу вычисления в массиве А (10), заполненном случайными числами из интервала [-1,6], суммы всех элементов массива.

2. Дана фраза. Определить, сколько в ней предложений.

Question

Информатика

Земфира

26 апреля, 05:13

1. Составьте программу вычисления в массиве А (10), заполненном случайными числами из интервала [-1,6], суммы всех элементов массива.

2. Дана фраза. Определить, сколько в ней предложений.

+5

Ответы (1)

Знаете ответ?

Лара · Answer 1

1)

var

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

s:integer;

i:byte;

begin

randomize;

s:=0;

for i:=1 to 10 do

begin

a[i]:=random (7) - 1;

writeln ('a[', i,']=', a[i]) ;

s:=s+a[i];

end;

writeln ('Сумма элементов=', s) ;

end.