Bài 3:
a) Viết đợc chơng trình (3Đ)
Program tbc;
var a,b:integer;
tb:real;
begin
write('Nhap vao tu ban phim 2 so nguyen:'); readln(a);
write('Nhap vao tu ban phim 2 so nguyen:'); readln(b);
tb:=(a+b)/2;
writeln(' Trung binh cong la:',tb:5:2);
Readln;
End.
b) Giải thích mỗi câu lệnh 0.3 đ
Bạn đang xem bài 3: - KIEM TRA 1 TIET TRAC NGHIEM