Viết chương trình Nhập vào 3 sô nguyên a,b,c in ra màn hình giá trị trung bình của 3 số nguyên đó Giúp mình với

0 bình luận về “Viết chương trình Nhập vào 3 sô nguyên a,b,c in ra màn hình giá trị trung bình của 3 số nguyên đó Giúp mình với”

1. program hello;

   uses crt;

   var a,b,c: integer;

   tb: real;

   begin

   clrscr;

   readln(a);

   readln(b);

   readln(c);

   tb:= (a+b+c)/3;

   writeln(trung_binh:10:0);

   readln;

   end.

   Bình luận

2. uses Crt;

   var a,b,c: integer;

   trung_binh: real;

   begin

   writeln(‘ Nhap so nguyen a= ‘);

   readln(a);

   writeln(‘Nhap so nguyen b= ‘);

   readln(b);

   writeln(‘Nhap so nguyen c= ‘);

   readln(c)

   trung_binh:= (a+b+c)/3;

   writeln(‘Gia tri cua 3 so nguyen a,b,c la: ‘, trung_binh);

   readln;

   end.

   Bình luận