Top.Mail.Ru
Ответы

Помогите пжпжжпжпжпжпжп это на паскале если что

Написать программу, которая находит сумму элементов массива, произведение элементов массива и количество отрицательных элементов массива. Массив состоит из 20 элементов, значение элементов в диапазоне [-13, 25]

По дате
По рейтингу
Аватар пользователя
Высший разум

вот так всё и лучше:

Аватар пользователя
Оракул

остальное сам
program massiv;
uses crt;
var
i,n:integer;
b:array[1..20] of integer;
BEGIN
randomize;
clrscr;
writeln('Vektor B: ');
for i:=1 to 20 do begin
b[i]:=random(38)-13; write(b[i]:3);
end;
writeln;
end.