Tipe data numerik real

Nilai konstanta numeril real berkisar dari 1E-38 sampai dengan 1E+38 dengan mantisa yang signifikan sampai dengan 11 digit. E menunjukkan nilai 10 pangkat. Nilai konstanta numeril real menempati memori sebesar 6
byte.

Contoh

Milsanya kita akan membuat pengenal variabel yang bernama Luas dan akan bernilai desimal atau ada pecahannya. Seperti Luas segi tiga atau ada proses matemaika yang benilai bilangan real.
Contoh

Program Luas_Segi_Tiga;
Var
Luas:real;
Alas,tinggi:byte;
Begin
Alas:=5;
Tinggi:=10;
Luas:=0.5*Alas*Tinggi;
Writeln(‘Alas =’,Alas);
Writeln(‘Tinggi=’,Tinggi);
Writeln(‘Luas =,’Luas);
End.

Bila program dijalankan akan menghasilkan

Alas =5
Tinggi=10
Luas =2.5E+1