1,hãy cho biết kết quả in ra màn hình khi thực hiện câu lênh sau:writeln(’16 div3=’,16div3);
2,để nhập dữ liệu bàn phím ta sử dụng lệnh A.readln B.read C.cả A và B đều đúng D.cả A và B đều sai
3,hãy viết biểu thức toán học sau dưới dạng Pascal:
(10+5)/(3+1)-18/(5+1)
4,viết chương trình nhập từ bàn phím số học sinh khối 6,7,8,9 của trường THCS Đa Phúc.Sau đó in ra tổng số học sinh toàn trường
Câu 1:
– Kết quả: 16 div 3 = 5
Câu 2:
C. Cả A và B đều đùng
Câu 3:
(10+5)/(3+1)-18/(5+1)
Câu 4:
Uses crt;
Var s, h6, h7, h8, h9: integer;
Begin
Clrscr;
Write(‘Nhap so hoc sinh khoi 6: ‘); readln(h6);
Write(‘Nhap so hoc sinh khoi 7: ‘); readln(h7);
Write(‘Nhap so hoc sinh khoi 8: ‘); readln(h8);
Write(‘Nhap so hoc sinh khoi 9: ‘); readln(h9);
s:=h6+h7+h8+h9;
Writeln(‘Tong so hoc sinh toan truong la: ‘,s);
Readln
End.
1) 5
2)C
3) (10+5)/(3+1)-18/(5+1)
4)
Program CT_tong_hs;
var a,b,c,d,x: integer;
begin
writeln(‘so hoc sinh khoi 6’); Readln(a);
writeln(‘so hoc sinh khoi 7’); Readln(b);
writeln(‘so hoc sinh khoi 8’); Readln(c);
writeln(‘so hoc sinh khoi 9’); Readln(d);
x:= a + b + c + d;
writeln(‘Tong so hoc sinh cua truong Da Phuc ‘, x);
Readln;
end.
Đã test