1. Viết chương trình tính tổng hai số A và B với A, B là 2 số được nhập từ bàn phím 2. Viết Chương trình tính hiệu a - b với a,b là hai số nguyên nhập từ bàn phím 3. Viết chương trình tính (a+b)/(a-b) nhập từ bàn phím 4. Tính diện tích chu vi hình tròn

Câu 1:

program tong;

uses crt;

var a, b : integer;

begin

clrscr;

write('nhap so nguyen a :');readln(a);

write('nhap so nguyen b :');readln(b);

writeln('tong hai so nguyen la :', a+b);

readln

end.

Câu 2:

program hieu;
uses crt;
var a, b : integer;
begin
clrscr;
write('nhap so nguyen a :');readln(a);
write('nhap so nguyen b :');readln(b);
writeln('hieu hai so nguyen la :', a-b);
readln
end.

Câu 3:

program chia;
uses crt;
var a, b : integer;
begin
clrscr;
write('nhap so nguyen a :');readln(a);
write('nhap so nguyen b :');readln(b);

writeln('gia tri bieu thuc la :', (a+b)/(a-b));

readln

end.

Câu 4: 

Program Hinh_tron;
Uses crt;
Var r, cv, dt : real;
Begin
Clrscr;
Write ('Nhap ban kinh hinh tron: ');
Readln (r);
cv := 2*pi*r;
dt := r*r*pi;
Writeln('Chu vi hinh tron la : ', cv);
Writeln('Dien tich hinh tron la :', dt);
Readln
End.