Varianta C++:
#include<iostream>#include <math.h> using namespace std; int main(){ int i, n, vect[100], s=0, p=1; cin>>n; for (i=1; i<=n; i++) { cin>>vect[i]; if (i%2==0) s+=vect[i]; else p*=vect[i]; } cout<<"Suma = "<<s<<endl; cout<<"Produsul= "<<p; return 0;}
Trb sa inv sa adaptezi in Pascal....Nu am lucrat in el dar inlocuiesti doar cateva elemente care nu-s in Pascal cum ar fi (if, for, cin)
Sper ca te-am ajutat oarecum... Scuze