Bài 3: Viết chương trình cho phép tính trung bình cộng của bốn số với điều kiện chỉ được sử dụng hai biến. Bài 4. Viết chương trình cho phép tính trung bình nhân của bốn số với điều kiện chỉ được sử dụng hai biến. Bài 5. Viết chương trình nhập hai số, đổi giá trị hai số rồi in ra hai số.

Bài 3: Viết chương trình cho phép tính trung bình cộng của bốn số với điều kiện chỉ được sử dụng hai biến.

Program TB_Cong_4_So;

uses crt;

Var s,a: real;

Begin

     Clrscr;

     S:=0;

     Write(‘Nhap so thu nhat:’);readln(a); S:=S+a;

     Write(‘Nhap so thu hai:’);readln(a); S:= S+a;

     Write(‘Nhap so thu ba:’);readln(a); S:=S+a;

     Write(‘Nhap so thu tu:’);readln(a); S:=S+a;

     Writeln(‘Trung binh cong: ‘,S/4:10:2);

     readln

end

 Bài 4. Viết chương trình cho phép tính trung bình nhân của bốn số với điều kiện chỉ được sử dụng hai biến.

Program TB_Cong_4_So;
uses crt;
Var s,a: real;
Begin
     Clrscr;
     S:=0;
     Write('Nhap so thu nhat:');readln(a); S:=S+a;
     Write('Nhap so thu hai:');readln(a); S:= S+a;
     Write('Nhap so thu ba:');readln(a); S:=S+a;
     Write('Nhap so thu tu:');readln(a); S:=S+a;
     Writeln('Trung binh cong: ',S/4:10:2);
     readln

end

Bài 5. Viết chương trình nhập hai số, đổi giá trị hai số rồi in ra hai số.

program bai1;

var          a,b,c:integer;

begin 

              ('moi ban nhap so thu nhat: '); readln(a);

              ('moi ban nhap so thu hai: '); readln(b);

               c:=a; a:=b; b:=c;

               write(' so thu nhat sau khi hoan doi la: ',a);

               write(' so thu hai sau khi hoan doi la: ',b);

               readln;

end.

Thông cảm vì câu 3 và câu 4 mình không làm được , mình sẽ làm làm sau