Cho bài toán sau: Nhập vào từ bàn phím hai số nguyên là a và b. Tính tích và trung bình cộng của chúng để in các kết quả ra màn hình. Gợi ý: Gọi t là biến để lưu kết quả tính tích cuả hai số trên; Gọi tbc là biến để lưu kết quả tính trung bình cộng cuả hai số trên; Yêu cầu: Điền câu trả lời vào chỗ trống để hoàn thành chương trình sau. LƯU Ý: CÁC ĐÁP ÁN KHÔNG CHỨA DẤU CÁCH. Program bai_tap; Var .................. ; t: longint ; tbc: .................. ; Begin writeln(' nhap vao hai so a va b ='); .................. ; t := a *b ; tbc := (a +b) /2 ; writeln(' tich =',.................. ) ; writeln('trung bình cộng =', tbc) ; readln; End.
2 câu trả lời
program bai_tap;
var a, b : integer; t : longint; tbc : real;
begin
writeln('nhap vao hai so a va b = '); readln(a, b);
t := a * b;
tbc := (a + b) / 2;
writeln('tich = ', t);
writeln('trung binh cong = ', tbc);
readln
end.
Chữa:
Program bai_tap;
Var a,b:longint;
t: longint ;
tbc:real ;
Begin
writeln(' nhap vao hai so a va b =');
read(a,b);
t := a *b ;
tbc := (a +b) /2 ;
writeln(' tich =',t ) ;
writeln('trung bình cong =', tbc) ;
readln;
End.
Câu hỏi trong lớp
Xem thêm