Tugas Alpro PPT Minggu ke 3 Kasus 3.3



Mencari Nilai Akar Imajiner

Analisis :
1. Input   :a,b,c (Inputkan Nilai a,b,c)
2. Proses :Disk <- (b*b)-(4*a*c)
3. Kondisi: jika (a=0)
                  Jika (Disk>0)
                  Jika (Disk=0)
4. Proses  :x1 <- -b/2*a
                   x1<-  -b+sqrt(Disk)/2*a
                   x2<-  -b-sqrt(Disk)/2*a
5. Inisialisasi : x2 <- x1
6. Output : x1 & x2 , akar imajiner


Algoritma :
1. Deklarasi 
   a,b,c : integer (input)
   Disk : Long int (output)
   x1,x2 : real (output)

2. Deskripsi
   read (a,b,c) 
   Disk <-- (b*b)-(4*a*c)
   if (a=0) then write ("Bukan Persamaan Kuadrat)
   else if Disk > 0 then
   x1<--- (-b) + sqrt(Disk)/2*a
   x2<--- (-b) - sqrt(Disk)/2*a
   else if Disk = 0 then
   x1 <--- (-b)/2*a
   x2 <--- x1
   else write ("Akar Imajiner")
   end if
   write (x1,x2)
Logikanya menggunakan raptor
Program C++
#include <iostream>
using namespace std;
int main(int argc, char** argv) {
    int a,b,c;
    long disk;
    float x1,x2;
    cout<<"Koefisien Pangkat 2 : ";cin>>a;
    cout<<"Koefisien Pangkat 1 : ";cin>>b;
    cout<<"Koefisien Pangkat 0 : ";cin>>c;
    if (a==0){
        cout<<"Bukan Persamaan Kuadrat"<<endl;
        cout<<"Harga Akar = "<< -c/b;} else {
            disk = b*b-4*a*c;
            if(disk>0){
                x1= -b+sqrt(disk)/(2*a);
                x2= -b-sqrt(disk)/(2*a);
                cout<<"Diskriminan = "<<disk<<endl;
                cout<<"x1 = "<<x1<<endl;
                cout<<"x2 = "<<x2<<endl;
            }
            else if(disk==0){
                x1= -b/(2*a); x2=x1;
                cout<<"Diskriminan = 0"<<endl;
                cout<<"x1 ="<<x1<<endl;
                cout<<"x2 ="<<x2<<endl;
            }
            else
            cout<<"Akar Imajiner "<<endl;
        }
        system("PAUSE");
    return 0;
}


 

Share this:

ABOUT THE AUTHOR

Ceyron Louis

A web designer from India. And then you write some more information about yourself like this to fill out the space that is left.

0 komentar:

Posting Komentar