Ответ: ar i:integer;
mas : array[0..19] of Integer;
Begin
Randomize;
for i:=0 to 19 do mas[i] := Random(30)-15;
for i:=1 to 20 do
Begin
if 0< mas[i]
Дан одномерный целочисленный массив. Найти: сумму элементов массива, расположенных между первым и последним нулевыми элементами.
Помогите написать код на Delphi. — Правильный ответ на вопрос найдете ниже
13.09.2019 · 1