На примере первой пары (до знака равенства) определите тип логической связи и впишите отсутствующий - id510640620200328 от sofika121 28.03.2020 04:39

Question

Информатика: На примере первой пары (до знака равенства) определите тип логической связи и впишите отсутствующий элемент.например: добро - зло=металл -неметалл. морская вода - вода = йодная настойка - … кристаллический - алмаз = аморфный - … катод - анод = кислота - … углерод - карбонат = кремний - … растительное масло - жмых = речная вода - … сталь - железо = бронза - …

sofika121 · Accepted Answer

Const
nn = 50;

var
T: array[1..nn] of integer;
i, n, s: integer;

begin
Writeln('Введите количество элементов в массиве (n<51): ');
Readln(n);
Writeln('Введите элементы массива');
s:=0;
for i := 1 to n do
begin
Read(T[i]);
if T[i]<0 then s := s + T[i]
end;
Writeln('Сумма отрицательных элементов массива равна ', s)
end.

Тестовое решение:
Введите количество элементов в массиве (n<51):
10
Введите элементы массива
5 -6 2 0 4 11 -8 0 1 -2
Сумма отрицательных элементов массива равна -16

MOGZ ответил