Turbo Pascalban segíteni?
Figyelt kérdés
A feladat az lenne hogy 1-től 20-ig kéne egymás alá a számokat kiíratni de a 40.oszlopban. Én eddig jutottam:
program feladat;
uses crt;
var
i: integer;
begin
clrscr;
for i:=1 to 20 do
begin
gotoxy(1,40)
writeln(i);
end;
readln;
end.
2011. júl. 7. 19:16
1/6 anonim válasza:
A gotoxy(1,40) ne legyen a cikluson belül, akkor mindig visszamegy ugyanoda.
2/6 anonim válasza:
ja, 10 éve nem pascaloztam és remélhetőleg sose fogok, de a gotoxy sor paraméterének is az i változónak kell lennie, úgy lesznek egy másik oszlopban egymás alatt. szintaktikagilag meg ilyesmi nemtom jó e, szemantikailag kb ennyi
3/6 anonim válasza:
Ez lenne a megoldás:
uses crt;
var
i: integer;
begin
clrscr;
for i:=1 to 20 do
begin
gotoxy(40,i);
writeln(i);
end;
readln;
end.
4/6 anonim válasza:
Lehet gotoxy nélkül is:
uses crt;
var
i: integer;
begin
clrscr;
for i:=1 to 20 do
begin
writeln(i:40);
end;
readln;
end.
5/6 A kérdező kommentje:
Köszönöm szépen mindenkinek!!!!
2011. júl. 7. 21:34
6/6 anonim válasza:
Szóval Lacika nem tudtad egyedül megcsinálni?
Szabó tanár úr...
Kapcsolódó kérdések:
Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!