Написать программу поиска произведения последовательности отрицательных чисел, вводимых с клавиатуры, предшествующих первому введенному нулю. Контрольный пример: 1,2,3,-4,5,-2,0. Delphi либо Pascal.

Есть ответ
12.12.2022
98

Ответ


Ответ:
var b:array[1..100] of integer;
i,p:integer;
begin
p:=1;
repeat
inc(i);
readln(b[i]);
until b[i]=0;
for var j:=1 to i do
begin
if b[j]


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
12.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.