Menu

AdS

Thursday, April 17, 2014

INT


Perintah untuk mengabaikan angka dibalik komma.(int(456.789)=456.
Contoh :
Uses crt;
Begin
Clrscr;
Writeln(‘Int dari 123.456 = ‘,int(123.456):0:0);
Writeln(‘Int dari -123.456 = ‘,int(-123.456):0:0);
Writeln(‘Int dari 456.789 = ‘,int(456.789):0:0);
Writeln(‘Int dari -456.789 = ‘,int(-456.789):0:0);
Readln;
End.

Contoh:
Uses crt;
Var angka:real;
Begin
Clrscr;
Writeln(‘Ketikan Angka Real: ‘);readln(angka);
Writeln(‘Int dari ‘,angka:0:3’=’int(angka):0:0);
Readln;
End.

CATATAN:
Desimal adalah angka dibalik koma:
Dikarenakan format desimal yang digunnakan tidak seperti di indonesia  menggunakan koma(,) dalam turbo pascal format desimal menggunakan titik (.).



No comments:

Post a Comment