Latest Updates

Program Tebak Angka


Algoritma dan Pemrograman dengan menggunakan dev-pascal
-------------------------------------------------------------------------------------------------------------------------
-------------------------------------------------------------------------------------------------------------------------

program tebak_angka;
{
Programmer:Agun Wiguna
Deskripsi: Tebak angka
}

const kunci=57;
var
   bil,n:integer;

begin
writeln('Tebak Bilangan yang ada di dalam komputer');
repeat
      write('Masukan angka 1-100:');readln(bil);
      n:=n+1;
until  (bil=kunci) or (n>=10);
if n<10 then
writeln('Anda Beruntung')
else
writeln('anda belum beruntung');

readln;
end.

MENANTI FAJAR


Semester ganjil akan segera berakhir dan UAS akan segera tiba, begitu banyak tugas yang di berikan kepada dosen untuk mahasiswanya dan tugasnya pun bermacam-macam pula ada tugas individu maupun tugas kelompok, dan sekarang saya sedang disibukan tugas kelompok, kurang lebih selama 2 hari ini saya beserta teman kelompok saya sedang mengerjakan tugas sampai larut malam. Semester ganjil akan segera berakhir itu berarti mulai dari semester genap kelas kita akan terpecah khususnya kelas IF-9, jika kelas kita sudah terpecah kuharap komunikasi kita tetap terjaga. Masuk sama-sama, Lulus pun harus sama-sama. Sukses buat kalian yang kurang lebih 1 minggu lagi akan menghadapi UAS perbanyak review materi yang telah dipelajari jangan kebanyakan main Dota :D. Semoga IP pertama kita memuaskan dan tidak ada mata kuliah yang harus di ulang. Salam Sukses dari saya yang menulis cerita ini jam 3 pagi sambil menanti fajar tiba.  

Kategori

Followers