Biodata

Hai sobat SNC kali ini ane mau membahasa tentang perumusan/pemprograman turbo pascal 7 ,yang saya bahas sekarang  adalah tentang bagai mana cara membuat biodata menggunakan turbo pascal langsung aja kita menuju TKP

SS 

uses crt;
var nama:string;
    alamat:string;
    usia:integer;
    tinggi:real;
    berat:real;

    begin
    clrscr;
    nama:='M Effan Dwi S';
    alamat:=' Jl. Tegal Boro Gg III Tuban';
    usia:=16;
    tinggi:=160;
    berat:=45.5;
    writeln('namanya ',nama);
    writeln('rumahnya di ',alamat);
    writeln('sekarang usia ',usia);
    writeln('dengan tinggi badan ',tinggi:2:0);
    writeln('dan berat badan ',berat:2:2);

    readln;
    end.

jika ada kesalahan comment di bawah



Share This :