Să se afişeze în fişierul “tri1.txt” triunghiul de numere:
n n-1 n-2…3 2 1
……………
3 2 1
2 1
1
program prob21;
var f:text;
i,j,n:integer;
begin
write(‘n=’); readln(n);
assign(f,’tri1.txt’);
rewrite(f);
for i:=n downto 1 do begin
for j:=i downto 1 do write(f,j:4);
writeln;
end;
close(f);
end.
unde n este un număr natural citit de la tastatură.
Incepem cu probleme de info.. ?
Posturi asemanatoare
Daca vrei sa fii la curent cu ceea ce apare zilnic pe blog, poti sa te abonezi la feedreader ( e gratis, in cazul in care iti pui intrebarea ).
Pe langa asta, poti sa ma urmaresti pe Twitter ori pe Facebook. Daca te intereseaza mai mult partea
profesionala a lucrurilor, atunci vezi mai multe pe profilul meu de linkedin, incerc sa il tin cat de cat la curent.
Liber la discutii !