Question

Să se compună un program care va afișa „piramida” de numere de mai jos: 1 2 3 4 5 1 2 3 4 1 2 3 1 2 1. Pascal​

Answer 1

Răspuns:

Program p1;

var n,i,j:integer;

 

 begin

   Writeln('Dati valori lui n');

   Readln(n);

   for i:=1to n do

   begin

     for j:=1 to i do

       write(j);

     writeln;

   end;

   readln;

 end.

sa-ti arate invers de la mare la mic:

Program p1;

var n,i,j:integer;

 

 begin

   Writeln('Dati valori lui n');

   Readln(n);

   for i:=n downto 1 do

   begin

     for j:=1 to i do

       write(j);

     writeln;

   end;

   readln;

 end.

Explicație:

o sa-ti arate      

1

12

123

1234

12345

Invers:

12345

1234

123

12

1