دستور پاک کردن صفحه در پاسکال یا ConsoleApplication

[nilidelphi]

با سلام خدمت دوستان
من دوتا سوال خیلی ساده در مورد پاسکال دارم میدونم که خیلی مبتدی ولی اینقدر با دلفی کار کردم که پاسکال یادم رفته سوالام اینن :
1-چطور میشه صفحه رو پاک کرد یعنی اون صفحه سیاه رنگ کنسول رو؟
به عبارت دیگر دستور مشابه دستور
clrcsr(); در C ؟

2- چطور میشه صفحه رو نگه داشت تا زود بسته نشه؟ مشابه دستور
getch(); در C ؟

اگر از دوستان برنامه ی تحت کنسول با پاسکال با موضوع یه کتابخانه ساده که بتونه کمکم کنه در اخطیارم بزارن خیلی ممنون میشم.

با تشکر:خجالت:

[Felony]

برای پاک کردن همون تابع clrscr از کتابخانه Crt و برای منتظر موندن برای ورود یک کارکتر هم Readln .

[nilidelphi]

دوست عزیز من از دلفی 2009 استفاده می کنم و از کنسول
هرچی کتابخونه Crt رو تو لیست uses ها اضافه می کنم ارور میده و نمیشناسه.
دستور دیگه ای نیست؟

[Felony]

کتابخانه Crt مربوط به پاسکال هست ، تو دلفی این کتابخانه وجود نداره و تابع آماده ای هم برای این کار وجود نداره ، میتونید خودتون بنویسید ، مثلا :

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils, Windows;

procedure Clr;
var
nConsoleHandle : Integer;
lwWritten : Longword;
Coord : TCoord;
begin
Coord.X := 0;
Coord.Y := 0;
nConsoleHandle := GetStdHandle(STD_OUTPUT_HANDLE);
FillConsoleOutputCharacter(nConsoleHandle, #32, 80*24, Coord, lwWritten);
end;

begin
WriteLn('salam');
Clr;
Readln;
end.

[nilidelphi]

دوست گرامی ممنون از پاسخ هاتون ولی من بدلایلی مجبور شدم از خود پاسکال استفاده کنم تا کنسول دلفی .

حالا یه مشکل دارم :
باز هم به کتابخانه ی CRT مشکل می گیره . البته وقتی کامپایل می کنم ارور نمیده ولی وقتی اجرا می کنم این ارور رو میده :
Error : Division by zero
وقتی از یکی در مورد این ارور پرسیدم گفت از CRT هستش .

حالا من این برنامه ی طلسم شده ی خودمو چطور اجرا کنم.

شرمنده ها اینقدر سوالام مبتدی چون من تاحالا پاسکال کار نکرده بودم و فقط از دلفی استفاده کردم و این دو خیلی با هم فرق دارن.

من فکر می کردم Pascal هم مثل C باشه ولی انگار بعضی از کتابخونه هاش بصورت پیشفرض وجود ندارند.

میشه کمکم کنید.؟

با تشکرات فراوان.

[Felony]

Error : Division by zero
متن پیغام خطا که واضحه ، تو برنامتون جایی تقسیم بر 0 صورت میگیره .


وقتی از یکی در مورد این ارور پرسیدم گفت از CRT هستش .
ربطی به این کتابخانه نداره ، حداقل من به شخصه همچین مشکلی نداشتم .

[nilidelphi]

دوست عزیر من در برنامه به هیچ وجه از تقسیم استفاده نکردم.

اصلا از عملیات ریاضی استفاده نکردم
وگرنه می دونم که اون ارو مربوط به تقسیم بر صفر است.

البته من مشکلمو پیدا کردم
مشکل در کامپایلرم بود چون بعضی از کتابخانه ها رو نداشت.

به هر حال از راهنماییتون بسیار متشکرم.