Sunday, October 26, 2014

PROGRAN MENGHITUNG NILAI MAHASISWA DENGAN C++ DAN PASCAL

CODING C++


# include <stdio.h>
# include <conio.h>
# include<iostream.h>
void main()
{
char nama [40] ;
char nim [10] ;
char ttl[40] ;
char umur[30] ;
char agama [20] ;
int nilai1, nilai2, nilai3, nilai4, nilai5, jumlah;
float rata;
clrscr();
/*input*/
cout<<"---SELAMAT DATANG DI RENDYARTG---"<<endl;
cout<<endl;
cout<<"----------------------------------"<<endl;
cout<<endl;
cout<<"PROGRAM MENGHITUNG NILAI MAHASISWA "<<endl;
cout<<endl;
cout<<"----------------------------------"<<endl;
cout<<endl;
cout<<"------CREATED BY KELOMPOK 4-------"<<endl;
cout<<endl;
printf("MASUKAN NAMA : "); gets(nama);
printf("MASUKAN NIM : "); scanf("%s",&nim);
printf("MASUKAN TEMPAT TANGGAL LAHIR : "); scanf("%u \t",&ttl);
cout<<"UMUR : "; cin>>umur;
cout<<"AGAMA : "; cin>>agama;
cout<<"MASUKAN NILAI KEHADIRAN : "; cin>>nilai1;
cout<<"MASUKAN NILAI QUIZ : "; cin>>nilai2;
cout<<"MASUKAN NILAI TUGAS : "; cin>>nilai3;
cout<<"MASUKAN NILAI MID : "; cin>>nilai4;
cout<<"MASUKAN NILAI SEMESTER : "; cin>>nilai5;
jumlah= (nilai1+nilai2+nilai3+nilai4+nilai5);
rata= (nilai1+nilai2+nilai3+nilai4+nilai5)/5;
/*output*/
cout<<endl;
cout<<" MEMPEROLEH TOTAL NILAI JUMLAH : "<<jumlah;
cout<<endl;
cout<<" DENGAN NILAI RATA-RATA : "<<rata;
getch();
}



CODING PASCAL


program Menghitung_Nilai_Mahasiswa;


{$APPTYPE CONSOLE}


var

    Nilai_Jumlah,Nilai_Kehadiran,Nilai_Quis,Nilai_Tugas,Nilai_Mid,Nilai_Semester:Integer;

    Nilai_RataRata:Real;

    Nama:string;

    NIM:string;

    Tempat_Tanggal_Lahir:string;

    Umur:string;

    Agama:string;


begin

writeln('----------------------------------');

writeln('PROGRAM MENGHITUNG NILAI MAHASISWA');

writeln('----------------------------------');

writeln('-------CREATED BY KELOMPOK 4------');

write('MASUKAN NAMA=');readln(nama);

write('MASUKAN NIM=');readln(NIM);

write('MASUKAN TEMPAT TANGGAL LAHIR=');readln(Tempat_Tanggal_lahir);

write('MASUKAN UMUR=');readln(umur);

write('MASUKAN AGAMA=');readln(agama);

write('MASUKAN NILAI KEHADIRAN=');Readln(Nilai_Kehadiran);

write('Masukan NILAI QUIS=');Readln(Nilai_Quis);

write('Masukan NILAI TUGAS=');Readln(Nilai_Tugas);

write('Masukan NILAI MID=');Readln(Nilai_Mid);

write('Masukan NILAI SEMESTER=');Readln(Nilai_Semester);

Nilai_Jumlah:=(Nilai_Kehadiran+Nilai_Quis+Nilai_tugas+Nilai_mid+nilai_semester);

writeln('Nilai Jumlah=',Nilai_jumlah:5);

Nilai_RataRata:=(Nilai_Jumlah/5);

writeln('Nilai RataRata=',Nilai_Ratarata:5:2);

readln;

  { TODO -oUser -cConsole Main : Insert code here }

0 comments:

Post a Comment