👤
a fost răspuns

PROGRAM PASCAL
a) Sa se afiseze numerele de la 1 pana la 10 si sa se calculeze suma lor.
PROGRAM PASCAL
b) Sa se afiseze numerele de la 10 pana la 1 si sa sa calculeze produsul lor.
"a" si "b" sunt 2 programe aparte

Răspuns :

a)var

 i,S:integer;
 
begin

 for i:=1 to 10 do
  begin
   write(i,' ');
   S+=i;
  end;
  
 writeln;
 write(S);

end.

b)var

 i,P:integer;
 
begin

 P:=1;

 for i:=10 downto 1 do
  begin
   write(i,' ');
   P*=i;
  end;
  
 writeln;
 write(P);

end.
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile disponibile v-au fost utile și inspiraționale. Dacă aveți întrebări sau aveți nevoie de suport suplimentar, suntem aici pentru a vă ajuta. Ne face plăcere să vă revedem și vă invităm să adăugați site-ul nostru la favorite pentru acces rapid!


Ez Studiers: Alte intrebari