Найдите сумму положительных элементов массива. пример:-9 2 4 -3 2. Сумма положительных элементов:8

237

302

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

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

danyaaseev2006

Информатика

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

12 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 var a, b, c, x, y, z: integer; summa1, summa2: integer; begin write('яблоки(руб/кг): '); readln(a); write('груши(руб/кг): '); readln(b); write('апельсины(руб/кг): '); readln(c); writeln; writeln('понедельник: '); write('продано кг яблок: '); readln(x); write('продано кг груш: '); readln(y); write('продано кг апельсинов: '); readln(z); summa1: =x*a+y*b+z*c; writeln; writeln('вторник: '); write('продано кг яблок: '); readln(x); write('продано кг груш: '); readln(y); write('продано кг апельсинов: '); readln(z); summa2: =x*a+y*b+z*c; writeln; writeln('понедельник: ', summa1, ' руб; вторник: ', summa2, ' руб'); end.