Viết chương trình tính tổng,tích của 2 số nguyên được nhập từ bàn phím

0 bình luận về “Viết chương trình tính tổng,tích của 2 số nguyên được nhập từ bàn phím”

1. Program BTT;
   Uses crt;
   Var a, b: integer;
   Begin
         Clrscr;
         Write(‘Nhap a = ‘); readln(a);
         Write(‘Nhap b = ‘); readln(b);
         Writeln(‘Tong 2 so la: ‘,a+b:0:1);
         Writeln(‘Tich 2 so la: ‘,a*b:0:1);
   Readln
   End.

   Bình luận

2. Program Tongtich;

   Uses Crt;

   Var tong, tich, a, b: integer;

   Begin

    Clrscr;

    Write(‘Nhap so nguyen thu nhat: ‘);

    Readln(a);

    Write(‘Nhap so nguyen thu hai: ‘);

    Readln(b);

    tong := a + b;

    tich := a * b;

    Writeln(‘Tong cua hai so nguyen la: ‘, tong);

    Writeln(‘Tich cua hai so nguyen la: ‘, tich);

    Readln;

   End.

   *Giải thích:

   -Biến a và b chỉ là khai báo tên biến thôi, chứ không phải là gì đặc biệt mà phải bắt buộc là a và b

   -Clrscr là từ khóa dùng để xóa màn hình khi mỗi lần chạy chương trình

   Bình luận