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
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
By Lyla
By Lyla
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
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.
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.