một số bất kì từ bàn phím và in ra màn hình giá trị tuyệt đối của số đó.. KIỂM TRA[r]
(1)(2)BÀI 1: Viết chương trình nhập
(3)Program bai1; Var a: real;
Begin
writeln(‘nhap so a la:’); readln(a);
If a>=0 then writeln(‘Gia tri tuyet doi cua a la’,a) else writeln(‘Gia tri tuyet doi cua so a la’, -a) ;
(4)Bài 2: Viết chương trình nhập
số nguyên, kiểm tra xem số có phải ước hay
(5)Program bai1; Var a,b: integer; Begin
writeln(‘nhap so a va b la:’); readln(a,b);
If a mod b =0 then writeln(b,'la uoc cua',a) else If b mod a=0 then
writeln(a,'la uoc cua',b) else writeln('a va b khong la uoc cua nhau');
(6)Bài 3*: Hãy viết chương trình nhập
điểm hai mơn Tốn Văn từ bàn phím, sau tính điểm trung bình (ĐTB) mơn đó, xếp loại học lực và báo kết hình.
Biết ĐTB 8: xếp loại giỏi; 6,5 ĐTB < 8: xếp loại khá; ĐTB < 6,5:
(7)KIỂM TRA
Nhập độ dài cạnh một hình chữ nhật (số
(8)Bài **
Viết chương trình nhập số thực
a,b,c từ bàn phím, kiểm tra số có phải độ dài tam giác hay
không?
Nếu độ dài cạnh tam