Срочно, пожалуйста!!!!

Написать программу, при выполнении которой с клавиатуры вводится натуральное число N (гарантируется, что 10<= N <= 10^8) и выводится двухзначное число, образонанное двумя его первыми (старшими) цифрами. Например, при N= 2014 надо вывести 20.
Язык Паскаль

var N:longint;beginwriteln('Введите N');readln(N);writeln('N= ',N);while n>=100 do beginN:=N div 10;end;write(' Число = ',N);end.