Найдите произведение несчетных чисел из первых 10 натуральных чисел . постройте блок-схему

218

292

Посмотреть ответы 1

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

aresha134589870

Информатика

4,6(7 оценок)

Предпоследний ppp: =0; r: =0 for i: =n downto 1 do begin if (a[i]< 0) and (ppp=0) and (r=0) then ppp: =1; if (a[i]< 0) and (ppp=1)and (r=0) then begin ppp: =0; r: =1; nom_pp: =i end; end; (тут : =1 -датчик, что после него есть отр. число к=1-датчик, что мы уже взяли предпоследний и его номер(индекс) сохранили в переменной nom_pp)