BLOG - Rico -

BLOG - Rico -

Sabtu, 05 Maret 2011

PROGRAM BAHASA C SWITCH CASE DAN KONDISI

#include <stdio.h>
#include <conio.h>
#define phi 3.14

main()
{
    balik:
    clrscr();
    int alas,tinggi,jari;
    char nama[20], pil2, pil,kelas[5];
    float luas;
    printf("*****************************\n");
    printf("*   1. BIODATA              *\n");
    printf("*   2. Luas Segitiga        *\n");
    printf("*   3. Luas Lingkaran       *\n");
    printf("*****************************\n\n");

    printf("Masukan angka pilihan (1/2/3) = ");
    scanf("%s", &pil);
    printf("\n");
    switch(pil)
    {
        case '1':
        {
        printf("Nama : ");
        scanf("%s", &nama);
        printf("Kelas : ");
        scanf("%s", &kelas);
        printf("\n");
        printf("Nama Saya %s ", nama);
        printf(", Saya sekarang kelas %s\n", kelas);
        break;
        }

        case '2':
        {
        printf("Masukkan Alas = ");
        scanf("%i", &alas);
        printf("Masukkan Tinggi = ");
        scanf("%i", &tinggi);
        luas=alas*tinggi*0.5;
        printf("Luas = %2.2f \n", luas);
        break;
        }
        case '3':
        {
        printf("Masukkan jari-jari = ");
        scanf("%i", &jari);
        if (jari%7==0)
        luas=22*jari*jari/7;
        else
        luas=phi*jari*jari;
        printf("Luas = %2.2f\n", luas);
        break;
        }
        default:
        printf("Anda mengetikkan bilangan yang salah") ;
        getch();
        goto balik;
    }

    printf("\n");
    getch();
    ulang:
    printf("ketik \'y\' jika ingin mengulangi, ketik \'n\' untuk mengakhiri program :");
    scanf("%s",&pil2);
    if ((pil2=='y')||(pil2=='Y'))goto balik;
    else if ((pil2=='n')||(pil2=='N') )
    getch();
    else goto ulang;
}
Share this post
  • Share to Facebook
  • Share to Twitter
  • Share to Google+
  • Share to Stumble Upon
  • Share to Evernote
  • Share to Blogger
  • Share to Email
  • Share to Yahoo Messenger
  • More...

0 comments

:) :-) :)) =)) :( :-( :(( :d :-d @-) :p :o :>) (o) [-( :-? (p) :-s (m) 8-) :-t :-b b-( :-# =p~ :-$ (b) (f) x-) (k) (h) (c) cheer

 
Posts RSSComments RSSBack to top
© 2011 BLOG - Rico - ∙ Designed by BlogThietKe
Released under Creative Commons 3.0 CC BY-NC 3.0