Program Konversi Bilangan Positif Ke Negatif

kali ini program pascal yang akan dibuat adalah konversi bilangan positif ke negatif dimana algoritma perhitunganya bilangan positif yang diinputkan akan dikurangi 2 kali lipat hasil bilangan yang diinput. contoh jika input adalah 5 maka 5 akan dikurangi 2 kali lipat nilai dari 5 yaitu 10. maka 5 -10 = -5. algoritmanya cukup gampang dimengerti. baiklah sekarang langsung saja becoding riang.

Script Program Konversi Bilangan Positif Ke Negatif Pascal

Baca Juga

Versi Gambar

Script Coding

Versi Notepad

program konversi_postif_ke_negatif;

uses crt;

label input_ulang;

var a,b,c,d : integer;

begin

clrscr;

writeln('Program Pascal Konversi Positif Ke Negatif ');

writeln;

write('Masukkan Angka Positif Yang Diinginkan : ');

readln(a);

b:=a-2*a;

writeln;

writeln('Bilangan Positif ',a,' Setelah dikonversikan menjadi ',b);

readln;

end.

Tampilan Output Program saat dijalankan

Tampilan Program

Bagi yang ingin download program ini bisa melalui link dibawah

Download Program Konversi Positif Ke Negatif

scriptnya ane gak bakal banyak jelasin abis ngak terlalu susah, oh iya ane tadi lupa buat label input_ulangnya jadi itu baris bisa dihapus dan tidak akan mempengaruhi program sehingga bisa juga scriptnya seperti ini

program konversi_postif_ke_negatif;

uses crt;

var a,b,c,d : integer;

begin

clrscr;

writeln('Program Pascal Konversi Positif Ke Negatif ');

writeln;

write('Masukkan Angka Positif Yang Diinginkan : ');

readln(a);

b:=a-2*a;

writeln;

writeln('Bilangan Positif ',a,' Setelah dikonversikan menjadi ',b);

readln;

end.

Silahkan mencoba program ini dan jika tidak berhasil disarankan untuk mendownload program ini lewat mediafire agar ada perbandingan buat anda untuk mempelajari program ini.