Jumat, 09 September 2011

Algoritma Menjumlahkan 2bilangan

Pascal

Program penjumlahan;
Uses crt;
Var bilA, bilB, bilC : integer;
Begin
Clrscr;
Write('Masukkan bilangan A : ');
Readln(bilA);
Write('Masukkan bilangan B : ');
Readln(bilB);
BilC := bilA+bilB;
Write('Hasil jumlahannya adalah = ',bilC);
Readln;
End.

0 komentar:

Posting Komentar