8-1r · informatik.az

Дан массив. Найти сумму и произведение его элементов.

Формула суммы: Новая сумма = старая сумма + очередной элемент, то есть s := s + a[i], а формула произведения: p:=p*a[i]; Важным в этой задаче не забыть до цикла сумме присвоить 0, а произведению 1.

Const

 a:array[0..9] of integer=

(1,-3,5,7,-5,9,-7,6,-3,18);

Var

 i,s,p:integer;

 BEGIN

   s:=0;  p:=1;

   for i:=0 to 9 do

     begin

        s:=s+a[i];

        p:=p*a[i];

     end;

   writeln(s,'  ',p);

   readln;

 END.

#include <iostream>

using namespace std;

int main()

{  int a[10]={1,-3,5,7,-5,9,-7,6,-3,18};

    int i, s=0,p=1;

    for(i=0;i<=9;i++)

        s=s+a[i];

        p=p*a[i];

    cout<<s<<" "<<p<<endl;

    return 0;