contoh program pascal | perhitungan aljabar sederhana

contoh program pascal | perhitungan aljabar sederhana

uses wincrt;
var x,x_satu,x_dua,x_tiga:integer;
f:integer;
begin;
clrscr;
writeln('selamat datang di program 2x+1)');
write('masukan x :');readln(x);
f:=2*x+1;
writeln('==============================');
writeln('hasil total :',f);
end.