Selasa, 31 Mei 2011

example

For example:
Uses wincrt;
Var input:integer;
Begin
writeln('Nama : Rony Andrew');
writeln('NRP : 11-2004-180');
writeln('==================');
writeln('
');
Write('Masukkan Umur anda = ');readln(input);
If input <2 then
Writeln('klasifikasi Anda = Bayi')
else If input <12 then
Writeln('klasifikasi Anda = Anak-anak')
else If input <18 then
Writeln('klasifikasi Anda = Remaja')
else If input <24 then
Writeln('klasifikasi Anda = Dewasa muda')
else If input <40 then
Writeln('klasifikasi Anda = Dewasa tua')
else If input <55 then
Writeln('klasifikasi Anda = Orang Tua')
ElseWriteln('klasifikasi Anda = Lansia');
Repeat until keypressed
End.

pascal

Pascal Programming Language is a high-level programminglanguage developed by Niklaus Wirth in the late 1960s. Pascalwas taken from the name of Blaise Pascal, French mathematicianin the 17th century that made ​​mesih mechanical summation first.
Pascal language is known as a language that supports structured programming techniques. The language is forcing programmers todesign programs with a particular method and caution, and thusthis language is widely used for teaching purposes. However,Pascal is also used in the business world.
One reason why Pascal is not widely used by professionalprogrammers is that Pascal is not flexible and a lot ofshortcomings that needed to create large applications.
Because of this criticism, finally Wirth developed Modula-2language. Modula-2 is similar to Pascal but has additional capabilities.