Есть ответ 👍

Заполнить массив из 10 элементов случайными числами в интервале [-10,10] и подсчитать сумму всех отрицательных элементов.

190
389
Посмотреть ответы 2

Ответы на вопрос:


Var a: array [1..10] of integer;         i,s: integer; begin  randomize;     s: =0;     for i: =1 to 10 do      begin      a[i]: =random(20)-10;         write (a[i],' ');         if a[i] < 0 then s: =s+a[i];       end;   writeln;     writeln ('summa: ',s);     readln; end.

ну наверное потому-что у неё нету условий и т.д (к примеру if)? линейная программа - это, наверное, та программа, у которой только прямые действия (вычисления). ну где то так, хз как дальше сказать

Популярно: Информатика