54

Дан одномерный массив, состоящий из вещественных элементов. Найти сумму…

28 февраля 2023

Дан одномерный массив, состоящий из вещественных элементов. Найти сумму элементов массива, расположенных до последнего положительногоэлемента.

категория: информатика



67

var a: array [1… 100] of real; n, i: integer; flag: boolean; sum: real; begin read (n); for i: =1 to n do read (a[i]); flag: =false; sum: =0; for i: =n downto 1 do if flag then sum: =sum+a[i] else if a[i] > 0 then flag: =true; writeln (sum); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...