👤
a fost răspuns

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

Răspuns :

AGuyWithAShortNamezone

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 web care acoperă despre Informatică. Sperăm că informațiile furnizate v-au fost utile. Nu ezitați să ne contactați dacă aveți întrebări sau aveți nevoie de asistență suplimentară. Ne vedem data viitoare și nu ratați să marcați.


Zone Alte intrebari