Latihan Soal PTIK BSI Pertemuan 14

December 29, 2016 Add Comment

Question 1

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Inovasi adalah….
Select one:
 Correct

Feedback

Question 2

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Sebuah penemuan baru yang bertujuan untuk mempermudah kehidupan, disebut juga 
dengan…
Select one:
 Correct

Feedback

Question 3

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Yang tidak termasuk dalam ciri-ciri kewirausahaan menurut Scarborough dan Zimmerer, 
adalah…
Select one:
 Correct

Feedback

Question 4

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Indonesia terkenal akan kebudayaan hayati yang beragam, dikenal dengan istilah…
Select one:
 Correct

Feedback

Question 5

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Technopreneur IT Dunia yang mendirikan Google Inc. adalah….
Select one:
 Correct

Feedback

Question 6

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Yang bukan termasuk dalam dampak technopreneurship secara ekonomi adalah:
Select one:
 Correct

Feedback

Question 7

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Dimilikinya keyakinan atas kemampuan dirinya untuk sukses yang direfleksikan melalui 
motto bahwa kegagalan itu tak lain adalah  sukses yang tertunda, merupakan ciri 
kewirausahaan untuk…
Select one:
 Correct

Feedback

Question 8

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Tujuan Pendidikan TI berbasis Technopreneurship adalah…
Select one:
 Correct

Feedback

Question 9

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Identifikasi dan evaluasi Peluang, seorang pengusaha harus melihat, dan memiliki ketajaman 
untuk mengidentifikasi suatu peluang yang potensial, merupakan salah satu dari empat fase 
dalam proses kewirausahaan yang dikemukakan oleh…
Select one:
 Correct

Feedback

Question 10

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Dimilikinya semangat dan dorongan bekerja keras untuk mewujudkan impiannya ya ng lebih 
baik di masa mendatang, adalah ciri kewirausahaan yang dikemukakan oleh :
Select one:
 Correct

Feedback

Program Kasir Warung Kopi Borland C++ (Tugas akhir semester 1 BSI)

December 23, 2016 Add Comment
Selamat datang teman-teman Anak Kuliah, sekarang ini Anak Kuliah mau bagiin script lagi, mengenai Program Kasir Warung Kopi (WARKOP)  jangkrikk boss..
sehubungan juga karena merupakan tugas akhir semester dari Ibu dosen MatKul permograman.
Semoga bermanfaat yeah guys.

Script ini merupakan pengabungan dari :

  • Struct
  • If
  • Array
  • dll


#include <stdio.h>
#include <iostream.h>
#include <conio.h>
#include <iomanip.h>

menu()
{
cout<<"\n|                       MENU PESANAN                          |";
cout<<"\n =============================================================;";
cout<<"\n|1. Makanan                      2. Minuman                   |";
cout<<"\n|                                                             |";
cout<<"\n| a. Nasi Goreng  = Rp. 12.000,-  a. Tehbotol   = Rp.  5.000,-|";
cout<<"\n| b. Nasi Uduk    = Rp.  9.000,-  b. Teh Pucuk  = Rp.  4.000,-|";
cout<<"\n| c. Nasi Kucing  = Rp.  8.000,-  c. Susu Jahe  = Rp.  4.000,-|";
cout<<"\n| d. Mie Rebus    = Rp.  8.000,-  d. Kopi Jahe  = Rp.  3.000,-|";
cout<<"\n| e. Mie Goreng   = Rp.  9.000,-  e. Kopi+Susu  = Rp.  5.000,-|";
cout<<"\n| f. Mie Ayam     = Rp. 13.000,-  f. Tea Jus    = Rp.  FREE ,-|";
cout<<"\n =============================================================";
}

void main()
{
char Nama[20], Home;
struct
{
char  Kode[100], Tipe[100];
long Banyak, Jumlah, Harga;
}Warkop[100];
long   i, x, Total, Bayar, Kembali;
awal:
clrscr();
cout<<"\nMasukan Nama Anda : ";gets(Nama);
clrscr();

menu();
cout<<"\n\nBerapa Jenis Pesanan : ";cin>>x;

for (i=1;i<=x;i++)
{
clrscr();
menu();
cout<<"\nPesanan - : "<<i;
cout<<"\n ex. Kode Nasi Goreng --> 1a";
cout<<"\n\nKode Menu : ";cin>>Warkop[i].Kode;
cout<<"\nBerapa Banyak yang dipesan : ";cin>>Warkop[i].Banyak;
}

for (i=1;i<=x;i++)
{
if (strcmpi(Warkop[i].Kode, "1a")==0)
{
strcpy(Warkop[i].Tipe, "Nasi Goreng");
Warkop[i].Harga=12000;
}
else if (strcmpi(Warkop[i].Kode, "1b")==0)
{
strcpy(Warkop[i].Tipe, "Nasi Uduk");
Warkop[i].Harga=9000;
}
else if (strcmpi(Warkop[i].Kode, "1c")==0)
{
strcpy(Warkop[i].Tipe, "Nasi Kucing");
Warkop[i].Harga=8000;
}
else if (strcmpi(Warkop[i].Kode, "1d")==0)
{
strcpy(Warkop[i].Tipe, "Mie Rebus");
Warkop[i].Harga=8000;
}
else if (strcmpi(Warkop[i].Kode, "1e")==0)
{
strcpy(Warkop[i].Tipe, "Mie Goreng");
Warkop[i].Harga=9000;
}
else if (strcmpi(Warkop[i].Kode, "1f")==0)
{
strcpy(Warkop[i].Tipe, "Mie Ayam");
Warkop[i].Harga=13000;
}
else if (strcmpi(Warkop[i].Kode, "2a")==0)
{
strcpy(Warkop[i].Tipe, "Tehbotol");
Warkop[i].Harga=5000;
}
else if (strcmpi(Warkop[i].Kode, "2b")==0)
{
strcpy(Warkop[i].Tipe, "Teh Pucuk");
Warkop[i].Harga=4000;
}
else if (strcmpi(Warkop[i].Kode, "2c")==0)
{
strcpy(Warkop[i].Tipe, "Susu Jahe");
Warkop[i].Harga=4000;
}
else if (strcmpi(Warkop[i].Kode, "2d")==0)
{
strcpy(Warkop[i].Tipe, "Kopi Jahe");
Warkop[i].Harga=3000;
}
else if (strcmpi(Warkop[i].Kode, "2e")==0)
{
strcpy(Warkop[i].Tipe, "Kopi+Susu");
Warkop[i].Harga=5000;
}
else if (strcmpi(Warkop[i].Kode, "2f")==0)
{
strcpy(Warkop[i].Tipe, "Tea Jus   ");
Warkop[i].Harga=0;
}
}
clrscr();
cout<<"\nNama Pemesan : "<<Nama;
cout<<"\nNo.\tPesanan\t\tBanyak\t\tHarga\t\tJumlah"<<endl;
for (i=1;i<=x;i++)
{
Warkop[i].Jumlah=Warkop[i].Banyak*Warkop[i].Harga;
cout<<i<<"\t"<<Warkop[i].Tipe<<"\t"<<Warkop[i].Banyak<<"\t\t"<<Warkop[i].Harga<<"\t\t"<<Warkop[i].Jumlah<<endl;
}
Total=0;
for(i=1;i<=x;i++)
{
Total=Total+Warkop[i].Jumlah;
}
cout<<"\n\t\t\t\t\tTotal Harga : "<<Total;
cout<<"\n\t\t\t\t\tPembayaran : ";cin>>Bayar;
Kembali=Bayar-Total;
cout<<"\n\t\t\t\t\tKembali : "<<Kembali;

cout<<"\nTuku maning Coy ? : [Y/N] ";
Home=getche();
if (Home=='Y'||Home=='y')
goto awal;
getch();
}

Berikut tampilan dari input serta output script di atas :


Latihan Soal PTIK BSI Pertemuan 13

December 23, 2016 Add Comment

Question 1

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Dibawah ini yang bukan termasuk dampak Positif Teknologi Informasi dan Komunikasi 
di bidang pendidikan yaitu ?
Select one:
 Correct

Feedback

Question 2

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Mendorong Tindakan Konsumtif dan Pemborosan dalam Masyarakat termasuk dampak 
Negatif teknologi informasi dan komunikasi dalam Bidang? 
Select one:
 Correct

Feedback

Question 3

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Dibawah ini yang bukan termasuk Dampak positif teknologi informasi dan komunikasi di 
bidang perniagaan dan perdagangan, yaitu ?
Select one:
 Correct

Feedback

Question 4

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Dibawah ini yang termasuk Dampak negatif  TIK dalam bidang sosial dan budaya yaitu?
Select one:
 Correct

Feedback

Question 5

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Dibawah ini yang bukan termasuk Dampak Positif TIK di bidang pemerintahan yaitu?
Select one:
 Correct

Feedback

Question 6

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Sosialisasi kebijakan pemerintah dapat lebih cepat disampaikan kepada masyarakat 
termasuk dampak positif teknologi informasi dan komunikasi dalam Bidang?
Select one:
 Correct

Feedback

Question 7

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Meningkatkan Layanan kepada Masyarakat termasuk dampak positif teknologi informasi 
dan komunikasi dalam Bidang?
Select one:
 Correct

Feedback

Question 8

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Timbulnya jenis kejahatan baru.Kejahatan yang timbul antara lain penipuan, pencurian 
nomor kartu kredit, pornografi, pengiriman email sampah (spam), pengiriman virus, 
penyadapan saluran telepon, memata-matai aktivitas seseorang (spyware), dan 
mengacaukan trafik jaringan termasuk dampak positif teknologi informasi dan 
komunikasi dalam Bidang?
Select one:
 Correct

Feedback

Question 9

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Dibawah ini yang bukan termasuk Dampak negatif TIK di bidang pemerintahan yaitu?
Select one:
 Correct

Feedback

Question 10

Correct
Mark 1.00 out of 1.00
Flag question

Question text

Kemajuan TIK juga akan  semakin mempermudah terjadinya pelanggaran terhadap Hak 
Atas Kekayaan Intelektual (HAKI) karena semakin mudahnya mengakses data 
menyebabkan orang yang bersifat plagiatis akan melakukan kecurangan termasuk 
dampak negatif teknologi informasi dan komunikasi dalam Bidang?
Select one:
 Correct

Feedback