Pemrograman Pascal Deret kelipatan 2 dengan Perulangan For

Membuat Program untuk Menginput angka kelipatan 2 Menggunakan Perulangan For To Do


Buatlah program dengan menggunakan perulangan for, untuk menampilkan seluruh angka kelipatan 2 antara 0 hingga 100 

Inputan

Program For_To_Do;
uses crt;
var
        C: byte;
begin
        clrscr;
        writeln('||            Nama : Farhan Misbahul Hayat            ||');
        writeln('||            Npm  : 202143502440                     ||');
        writeln('=======================================================');
        writeln('>>> Input Angka Kelipatan 2 Menggunakan For To Do <<<');
        writeln('Angka kelipatan 2 dari 0 - 100');
        C:=2;
        for C:= 0 to 100 do
        begin
                if C mod 2=0 then
                write(C:4);
                end;
        readln;
end.


Hasil Output:



cuma catetan aja ges barangkali ada yang pengen tau caranya :)



Komentar