👤
a fost răspuns

Scrieți programul Pascal ce calculează produsul numerelor pare de la 1-50.

Răspuns :

AGUYWITHASHORTNAMEEN

Program P1;

var A : array[1..50] of real;

        i : integer;  d : real;

begin

For i:=1 to 50 do read (A[i]);

for i : =1 to 50 do if not odd(i) then P : = p*i;

writeln(p);

end.

Vă mulțumim că ați vizitat site-ul nostru dedicat Informatică. Sperăm că informațiile oferite v-au fost de ajutor. Dacă aveți întrebări sau nevoie de asistență suplimentară, nu ezitați să ne contactați. Vă așteptăm cu drag data viitoare și nu uitați să ne adăugați la favorite!


En Learnings: Alte intrebari