👤
ENCRISTITACU91
a fost răspuns

ElaboratI un program pascal care cireste de la tastiera un sir de numere intreGigi pana la întâlnirea numarului 0 și afisează
La ecran în rânduri aparte numărul și produsul elementelor din acest sir

Răspuns :

Răspuns:

program nrSiProdus;

var num, nr, prod:integer;

begin

 nr:=0; prod:=1;

 writeln('Introdu numere intregi, STOP este introducerea lui 0');

 read(num);

 while (num<>0) do

   begin

     inc(nr); prod:=prod*num;

     read(num);

   end;

 writeln('sirul contine ',nr,' numere');

 writeln('produsul lor este ',prod);

end.

   

Explicație:

Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile prezentate v-au fost utile. Dacă aveți întrebări suplimentare sau nevoie de ajutor, vă rugăm să ne contactați cu încredere. Așteptăm cu drag să reveniți și nu uitați să ne salvați în lista dumneavoastră de favorite!


En Studentsy: Alte intrebari