Anonymní profil Radulinka – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Anonymní profil Radulinka – Programujte.comAnonymní profil Radulinka – Programujte.com

 

Příspěvky odeslané z IP adresy 88.103.80.–

Pascal › matice otoceni
9. 12. 2013   #184992

pokud mozno bez procedur :-)

Radulinka
Pascal › matice otoceni
9. 12. 2013   #184990

Ahojky, mám problém s jedním programem, upozorňuji, že jsem uplný začatečník....mám otočit matici o 180stupňů, ale nějak si nevím rady......chtěla bych ji nejspíš otočit 2x o 90stupňů...

program maticee;
const max=10;

var n,x,y:integer;
    matice: array[1..max,1..max] of integer;

//matice+obracena o 90 stupnu

  begin
    write('napiste rozmer matice: ');
    readln(n);
    for x:=1 to n do begin
      for y:=1 to n do begin
        write('zadej radek ',x,' sloupec ',y,'  :  ');
        readln(matice[x,y]);


      end;
    end;
    writeln;
    writeln;
    writeln;
      for x:=1 to n do begin
      for y:=1 to n do begin
        write(matice[x,y],'  ');
      end;
      writeln();
     end;
    writeln;
    writeln;

    for x:=1 to n do begin
    for y:=n downto 1 do

 write (matice[y,x], '  ');

    writeln;

     end;


    writeln;

    readln();
  end.

Jenže ji zvládnu otočit pouze jednou o 90 a dál si nevím rady, poradil by mi někdo?

Popřípadě i jak se dá otočit rovnou o 180 stupnu?

Mockrát děkuji.

 

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032021 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý