Program Trung_Binh_Cong;
uses crt;
var a,b: real;
begin
clrscr;
write('nhap so a ='); readln(a);
write('nhap so b ='); realdn(b);
writeln('Trung binh cong cua 2 so ',a,' va ',b,' = ' , a*b/2);
readln;
end.
Cái này mới đúng :)
Program Trung_Binh_Cong;
uses crt;
var a,b: real;
begin
clrscr;
write('nhap so a ='); readln(a);
write('nhap so b ='); realdn(b);
writeln('Trung binh cong cua 2 so ',a,' va ',b,' = ' , a+b/2);
readln;
end.
Làm bài vui vẻ :)
program trung_binh_cong;
ues crt;
var a,b : real;
begin
clrscr ;
write ('nhap so a = ');
readln (a);
write ('nhap so b = ');
readln (b);
writeln (' trung binh cong cua hai so 'a' va 'b',= 'a+b/2');
readln
end.