Konu: İki sayıyı Toplamak Perş. Mart 26, 2009 11:59 pm
program hesap makinası; uses crt; var a,b,top:integer; begin writeln('lütfen birinci sayıyı giriniz'); readln(a); writeln('lütfen ikinci sayıyı giriniz'); readln(b); top:=a+b; writeln('iki sayının toplamı ',top,' dur'); readln; end.