Gambar di atas adalah soal-soal UAS sebelumnya, silahkan dipelajari sebagai referensi UAS tahun ini, semoga bermanfaat. Sementara baru ada jawaban soal B dan belum rapih, ya silahkan ulik-ulik lagi lah.... :D
#include <stdio.h>
#include <conio.h>
#include <string.h>
nama_pt()
{
printf("\nPendanaan Jaya Selalu");
printf("\nJl. kyai maja no. 40 Jokjakarta");
printf("\n==============================\n");
}
main()
{
int a,jml;
long angsuran_perbulan;
char tgl[10];
char no[10];
char kde_angs[2];
char ulang;
struct
{
float suku_bunga;
char kde[10];
int dana,lama_angsuran;
char perlu[20];
char nama[20];
char alamat[30];
}anggota[5];
ulang:
nama_pt();
printf("input jumlah peminjaman\t:");scanf("%d",&jml);
for(a=0;a<jml;a++)
{ printf("\n");
printf("Masukan data yang ke-%d",a+1);
printf("\nMasukan No Peminjaman= ");scanf("%s",no);
printf("\nMasukan Tanggal Peminjaman= ");scanf("%s",tgl);
printf("\nMasukan kode anggota= ");scanf("%s",anggota[a].kde);
printf("\ninput Dana yang mau dipinjam: ");scanf("%d",& anggota[a].dana);
printf("\ninput Kode Angsuran 1/3/5/7: ");scanf("%s",& kde_angs );
printf("\ninput Keperluan pinjam: ");scanf("%s", & anggota[a].perlu );
if(strcmp("P0912102", strupr (anggota[a].kde))==0)
{
strcpy(anggota[a].nama,"RAFFA");
strcpy(anggota[a].alamat,"Jl. Nusa Indah No. 3");
}
else if(strcmp("P1001001", strupr (anggota[a].kde))==0)
{
strcpy(anggota[a].nama,"Ilhamsyah");
strcpy(anggota[a].alamat,"Jl. Damai No. 3");
}
else
{
strcpy(anggota[a].nama,"Tidak Ada");
strcpy(anggota[a].alamat,"Tidak ada");
}
if(strcmp("1", strupr (kde_angs))==0)
{
anggota[a].lama_angsuran=12 ;
anggota[a].suku_bunga=0.07;
}
else if(strcmp("3", strupr (kde_angs))==0)
{
anggota[a].lama_angsuran=36 ;
anggota[a].suku_bunga=0.05;
}
else if(strcmp("5", strupr (kde_angs))==0)
{
anggota[a].lama_angsuran=84 ;
anggota[a].suku_bunga=0.08;
}
else if(strcmp("7", strupr (kde_angs))==0)
{
anggota[a].lama_angsuran=36;
anggota[a].suku_bunga=0.05;
}
}
clrscr();
nama_pt();
gotoxy(1,6);
printf("no");
gotoxy(5,6);
printf("Nama");
gotoxy(17,6);
printf("Alamat");
gotoxy(40,6);
printf("keperluan");
gotoxy(50,6);
printf("dana");
gotoxy(55,6);
printf("lama");
gotoxy(60,6);
printf("bunga");
gotoxy(70,6);
printf("angsuran");
for(a=0;a<jml;a++)
{
angsuran_perbulan=(anggota[a].dana/anggota[a].lama_angsuran)+(anggota[a].dana*anggota[a].suku_bunga);
gotoxy(1,(a+9));
printf("%d",(a+1));
gotoxy(5,(a+9));
printf("%s",anggota[a].nama);
gotoxy(17,(a+9));
printf("%s",anggota[a].alamat);
gotoxy(40,(a+9));
printf("%s",anggota[a].perlu);
gotoxy(50,(a+9));
printf("%d",anggota[a].dana);
gotoxy(55,(a+9));
printf("%d",anggota[a].lama_angsuran);
gotoxy(60,(a+9));
printf("%3.2f",anggota[a].suku_bunga);
gotoxy(70,(a+9));
printf("%ld",angsuran_perbulan);
}
printf("\napa ingin mngulang Y/T\t\t; ");scanf ("%s",&ulang);
clrscr ();
if (ulang=='y' || ulang=='Y')
{
goto ulang;
}
getch ();
}
2 komentar:
boleh minta kodingan yang soal uas no 1 "toko batik nya engga. Pliss bagi kodingannya
kak kalo ada kodingan nya yang soal no1 program "toko batik indonesi " tolong kirimin ke saya kak lewat email saya. email:rivaldihutagaol5@gmail.com
Posting Komentar