👤
DORINIVANOV19EZ
a fost răspuns

elaborati o functie care calculeaza produsul numeral de la 1 la noi cu conditi a că acestea sa fie impare diviziile cu 2 și 3

Răspuns :

DAIA123EZ
nu au cum sa fie impare si divizibile in acelasi timp cu 2 sau 6

POWER1999EZ

Program P1;

type vector = array[1..100] of real;

var a:vector;i,n: integer;sp,si:real;

function sumapare(a:vector):real;

var i:integer;sp:real;

begin

sp:=0;

for i:=1 to n do

if  i  mod 2= 0 then sp:=sp+a[i];

sumapare:=sp;

end;

function sumaimpare(a:vector):real;

var i:integer;si:real;

begin

si:=0;

for i:=1 to n do

if   i  mod 2= 1 then si:=si+a[i];

sumaimpare:=si;

end;

begin

write('n=');readln(n);

writeln('introdu elementele tabloului:');

for i:=1 to n do readln(a[i]);

sp:=sumapare(a);si:=sumaimpare(a);

if  sp=si then writeln('Da') else writeln('nu');

readln

end.

Bafta

Vă mulțumim că ați vizitat platforma noastră dedicată Informatică. Sperăm că informațiile oferite v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, nu ezitați să ne contactați. Așteptăm cu nerăbdare să vă revedem și nu uitați să ne salvați în lista de favorite!


Ez Askings: Alte intrebari