thuat toan
Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (20.43 KB, 1 trang )
<span class='text_page_counter'>(1)</span>Chương trình pascan nhập 2 số a,b đua ra màn hình tổng, hiệu tích thương của 2 số đó. Program tinh; Uses crt; Var a,b:integer; begin Clrscr; Write('Nhap vao lan luot 2 so a va b'); Readln(a,b); Writeln('Tong cua a va b la: ', a+b); Writeln('Hieu cua a va b la: ', a-b); Writeln('Tich cua a va b la: ',a*b); If b<>0 then Writeln('Thuong cua a va b la: ',a/b) else Writeln('Khong the chia cho 0, b phai khac 0'); Readln; End..
<span class='text_page_counter'>(2)</span>
