ALGORITMA DAN PEMOGRAMAN
Pada semester 1 dan 2 saya mempelajari aplikasi pemograman dengan 2 aplikasi pada aplikasi pertama mepelajari aplikasi turbo pascal dan pada semester 2 mempelajari aplikasi C++ kedua aplikasi sebenrnya hampr sama tapi lebih rumit aplikasi C++ jujur ni yaa ……
Lebih ngerti aplikasi turbo pascal dibanding C++ . sama-sama harus pakai deklarasi tapi C++ lebih sensitive beda A besar sama A kecil aja udah salah , salah dikit langsung error
Perbedaan c++ dengan turbo pascal
TURBO PASCAL :
program contoh_13;
uses wincrt ;
var
n,i:integer;
nama :array [1..10] of string [20];
NT :array [1..10] of real;
NUTS :array [1..10] of real;
NUAS :array [1..10] of real;
NA :array [1..10] of real;
grade :array [1..10] of char;
ket :array [1..10] of string [20];
nim :array [1..10] of string ;
begin
write ('banyak data mahasiswa = :');readln(n);
for i := 1 to n do
begin
write ('NIM :');readln(nim[i]);
write ('Nama :');readln(nama[i]);
write ('Nilai tugas :');readln(NT[i]);
write ('nilai ujian tengah semester :');readln(NUTS[i]);
write ('nilai ujian akhir semester :');readln(NUAS[i]);
writeln;
NA[i] :=(0.2*NT[i])+(0.3*NUTS[i])+(0.5*NUAS[i]);
if (NA[i]>=80)then
grade [i]:='A'
else if (NA[i]>=70)then
grade [i]:='B'
else if (NA[i]>=60)then
grade [i]:='C'
else if (NA[i]>=0)then
grade [i]:='E';
case grade [i] of
'A' :ket[i]:='LULUS';
'B' :ket[i]:='LULUS';
'C' :ket[i]:='LULUS' ;
'D' :ket[i]:='Tidak lulus';
'E' :ket[i]:='Tidak lulus';
end;
end;
writeln (' HASILNYA ');
writeln('============================================================================');
writeln('+ NIM Nama tugas UTS UAS NA grade ket');
writeln('=============================================================================');
for i:=1 to n do
begin
writeln(NIM[i]:10,Nama[i]:12,NT[i]:8:0,NUTS[i]:8:0,NUAS[i]:8:0,NA[i]:8:0,grade[i]:8,ket[i]:10);
end;
end.
APLIKASI C++
#include <iostream.h>
#include <conio.h>
#include"stdio.h"
#define phi 3.14
void main()
{
int a,b;
float luas, keliling;
printf("PROGRAM MENGHITUNG LUAS DAN KELILING LINGKARAN");
printf("\n\n\nmasukkan jari-jari:");
scanf("%d",&a);
printf("\n (1) menghitung luas \n (2) menghitung keliling");
printf("\n Inputkan 1/2: ");
scanf("%d",&b);
luas=phi*a*a;
keliling=2*phi*a;
if(b==1)
{printf("luas lingkaran adalah:%.2f",luas);
}
else if(b==2)
{printf("keliling lingkaran adalah:%.2f",keliling);
}
else
{printf("kode yang Anda masukkan salah...!");
}
getch();
}
Kamis, 11 Juni 2015
Selasa, 31 Maret 2015
pengenalan internet leni kartika
Pengertian Internet Menurut Wikipedia:
Internet (kependekan dari interconnection-networking) adalah seluruh jaringan komputer yang saling terhubung menggunakan standar sistemglobal Transmission Control Protocol/Internet Protocol Suite (TCP/IP) sebagai protokol pertukaran paket (packet switching communication protocol) untuk melayani miliaran pengguna di seluruh dunia
Pengertian Internet Menurut Oxford :
Kamus Oxford juga tidak ketinggalan mendefinisikan secara jelas mengenai internet. Menurutnya internet adalah jaringan komputer global yang menyediakan berbagai fasilitas informasi dan komunikasi, yang terdiri dari jaringan interkoneksi menggunakan protokol komunikasi standar.
Pengertian Internet Menurut EngineersGarage
EngineersGarage mengatakan bahwa tidak ada definisi yang baku untuk internet, internet tidak membatasi diri untuk setiap definisi tertentu. Namun secara umum internet dapat didefinisikan sebagai kabel atau nirkabel yang saling berkomunikasi yang bertujuan untuk mengirimkan informasi. Ada berbagai pengertian lain dari internet menurut ahli dan engineer IT lainnya.
Dari berbagai definisi/pengertian internet, mengenai pertanyaan apa itu internet begitu banyak pendapat dari para ahli tentang internet. Untuk sebab itu, kita tidak lagi dapat mengatakan bahwa internet hanyalah kumpulan dari komputer yang terhubung satu sama lain sebab dari sisi pengembangan, telah sangat banyak teknologi yang dikembangkan sebagai akses jarak jauh.Demikianlah, semoga artikel sederhana tentang Apa itu Internet, membantu menambah pengetahuan anda. Sampai jumpa pada artikel manfaat dan dampak internet.
Langganan:
Postingan (Atom)