Информатика, опубликовано 2018-08-22 19:18:34 by Гость
. Внести в программу изменения таким образом, чтобы программа выводила сумму отрицательных элементов массива. Program Massiv_1a; Var a:Array [1..20] Of Integer i,k:Intege Begin write(Введите количество элементов массива не более 20:); Read(k); For i:=1 To k Do Read(a) End.
Ответ оставил Гость
Program Massiv_1a;
Var a:Array [1..20] Of Integer
i,k,s:Integer
Begin
write(Введите количество элементов массива не более 20:);
Read(k);
For i:=1 To k Do Read(a[i]);
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на