Soal Console Application Delphi 7

1. Buatlah program untuk menampilkan bilangan genap antara 1 s/d 100,dengan  menggunakan For to  Do,While Do,Repeat Until(Dengan menggunakan Procedure)?
2. Buatlah program dengan menggunakan array dinamis untuk menampilkan:
---------------------------------------------------------------------------------------------------
NIS    :
Nama :
Nilai  :
Ingin Masukkan Data Lagi [Y\N]?
---------------------------------------------------------------------------------------------------
Dengan menggunakan Procedure?
3. a. Buatlah Procedure inputan untuk panjang dan lebar tanah?
    b. Buatlah Function untuk menghitung inputan yang tadi?

Link Download (.dpr dan .exe) Jawaban