programowanie: pomocy ! (pascal)

Vein [ Sannin ]

programowanie: pomocy ! (pascal)

Witam !!

Mam do napisania program w pascalu, musi on pobierac od urzytkownika podstawe trojkata i rysowac trojkat z "gwiazdek", podstawa ma byc nieparzysta, np trojkat ma wygladac tak:

____*____
___***___
__*****__
_*******_

(podkreslenei to spacja) to jest przykladowy o podstawie rownej 7, a wiec mam z programu mniejwiecej tyle:

program trkat
uses crt;
label label1;
var
a,b,c,d,x,y:longint; ‹b,c,d zmienne pomocnicze›
begin
label1:
clrscr;
writeln('podaj podstawe trujknonta(liczba nieparzysta');
readln(a);
if (a mod 2 = 0) then
begin
writeln('miala byc liczpa parzysta');
delay(500);
goto label1;
end
else
clrscr;
x:=40;
y:=1;
b:=1;
c:=2;
gotoxy(x,y);
repeat

until c=a;
repeat until keypressed

end.

miedzy begin a until byla pewna czesc programu, ale bledna, i wlasnie prosze o pomoc, jakby ktos mogl mi dopisac ta czesc to bylbym wdzieczny bo jest pozno, ja musze rano wstac i niemam jak tego dokaczyc, dzieki za wszelaką pomoc !!!

Vein [ Sannin ]

poprawilem jedna rzecz i sie "naprawilo" ;) heh, raka prozaiczna rzecz a tyle zmienia....