Matematické Fórum

Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.

Nástěnka
22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.

Nejste přihlášen(a). Přihlásit

#1 09. 11. 2015 09:23

zn
Zelenáč
Příspěvky: 19
Škola: JČU
Pozice: student
Reputace:   
 

Tabulka v Pascalu

Dobrý den,
nedokážu vytvořit tabulku v Pascalu nebo ji neumím zobrazit.
Napíšu program, který by snad měl fungovat, ale při spuštění mám vše pod sebou místo v tabulce.
Může to být tím, že Lazarus, kterým to píšu, tabulku při ladění neumí?
Za radu děkuji předem.

program tabulka(input,output);
var i,j:integer;

begin
  for i:=1 to 2 do
     for j:=1 to 2 do
        writeln(i*j);
    readln;
    end.

Offline

  • (téma jako vyřešené označil(a) zn)

#2 09. 11. 2015 11:46 — Editoval gladiator01 (09. 11. 2015 11:49)

gladiator01
Místo: Jindřichův Hradec
Příspěvky: 1587
Škola: ZČU FAV - SWI
Pozice: absolvent
Reputace:   53 
Web
 

Re: Tabulka v Pascalu

writeln ukončí výpis novým řádkem - tzn. za každou hodnotou se ti odřádkuje.

Musíš odřádkovat až po vypsání celé řádky, tj. až za vnitřním cyklem.

Code:

program tabulka(input,output);
var i,j:integer;

begin
  for i:=1 to 2 do
  begin
     for j:=1 to 2 do
     begin
       write(i*j, ' ');
     end;
     writeln();
  end;

  readln();
end.

Naděje jako svíce jas, potěší srdce štvané, čím temnější je noční čas, tím zářivěji plane.
VIVERE - MILITARE EST (Seneca)
Vím, že nic nevím. - Sokrates

Offline

 

#3 09. 11. 2015 12:13

zn
Zelenáč
Příspěvky: 19
Škola: JČU
Pozice: student
Reputace:   
 

Re: Tabulka v Pascalu

↑ gladiator01: Moc děkuji, funguje to.

Offline

 

Zápatí

Powered by PunBB
© Copyright 2002–2005 Rickard Andersson