PROGRAM MENYAPA

Program Menyapa;
Uses crt;
Begin
        Clrscr;
        Writeln('Ini Adalah Program Menyapa Budi');
        Writeln('Hai Budi Apa Kabarmu hari ini?');
        Writeln('Semangat dan sukses selalu');
        Readln;
End.