Contoh Flowchart Dan Pseduocode dengan Pascal

Contoh Flowchart Dan Pseduocode dengan Pascal

        Ini adalah jawaban untuk Latihan soal ke2 algoritma & Pemrograman dilengkapi codingan script pascal dan flowchart . Untuk Soalnya klik link "Latihan soal Ke2 Algoritma & Pemrograman" karna disini saya menggunakan pascal ada baiknya kita mengenal pascal "Apa Itu Pascal"

1.Pengertian Algoritma, Flowchart, dan Pseudocode
A. Algoritma adalah urutan langkah logis tertentu untuk memecahkan suatu masalah yang ditulis secara berurutan.

B. Flowchart adalah adalah suatu bagan dengan simbol-simbol tertentu yang menggambarkan urutan proses secara mendetail dan hubungan antara suatu proses (instruksi) dengan proses lainnya dalam suatu program.

 C. Pseduocode  adalah sebuah kode yang digunakan untuk menulis sebuah algoritma         dengan cara yang bebas yang tidak terikat dengan bahasa pemrograman tertentu.


   

2.     1.  Flowchart dan Pseduocode penjumlahan

Script Pascal Program Penjumlahan

Hasil Program Penjumlahan

 

Flowchart Penjumlahan

2.Flowchart dan Pseduocode Pengurangan

Script Pascal Program Pengurangan

Hasil Program Pengurangan

Flowchart Pengurangan

3.  Flowchart dan Pseduocode Rata-rata

Script Pascal Rata-Rata

Hasil Program Rata-Rata

 

Flowchart Rata-Rata

3­­. 1. flowchart dan pseudocode bilangan ganjil atau genap.

Program_GanjilGenap

Var

                                    Bil: Integer;

                        Begin

                                      If Bil mod 2=0 then

                                    Writeln ("Bilangan Genap");

                            Else

                                    Writeln("Bilangan Ganjil")

                                      End If;

                        End.    

Flowchart Penentu Bilangan Ganjil Genap

  2. flowchart dan pseudocode bilangan terbesar

Program_BilTerbesar

                          Var

                            a, b, c: Integer;

                          Begin

                                                IF a>b and a>c then

                                                 Writeln("a Bilangan Terbesar");

                                                Else

                                                IF b>a and b>c then

                                                Writeln("b Bilangan Terbesar");

                                                Else

                                                Writeln("c Bilangan Terbesar");

                                    End;

                             End.

Flowchart bilangan terbesar

3.Flowchart dan pseduocode Program Bilangan terkecil

Program_BilTerkecil

            Var

                            a, b, c: Integer;

            Begin

                                                IF a<b and a<c then

                                                 Writeln("a Bilangan Terkecil");

                                    Else

                                                IF b<a and b<c then

                                                Writeln("b Bilangan Terkecil");

                                                Else

                                                Writeln("c Bilangan Terkecil");

                                    End;

                            End.

Flowchart bilangan terkecil

Author : Novel Translate Indonesia

Share this

Related Posts