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

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

Question

Информатика

Наля

31 января, 18:14

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

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

+2

Ответы (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.