Составьте программу, определяющую, является ли целое положительное число трехзначным

Pascal: 
var
    n    : integer;
begin
    if n >= 100 then 
        write(Да, трехзначное);
    else 
        write(Нет, не трехзначное);
    readln; readln;  // для паузы
end.

p.s. За синтаксические ошибки не отвечаю

==============================
C++:

#include

int main() {
    //Если нужен русский язык на выводе написать здесь: setlocale(LC_ALL, "rus");
    int n;
    cin >> n;
    if (n>=100) {
        cout     } else {
        cout     }
    system("pause"); // Для паузы
    return 0;
}