Đề Kiểm Tra Môn Tin Học – Free Pascal Dành Cho Học Sinh Lớp 8

  • Trang Chủ
  • Đăng ký
  • Đăng nhập
  • Upload
  • Liên hệ

Thư Viện Đề Thi

Trang ChủTin HọcTin Học 8 Đề kiểm tra môn Tin học – Free Pascal dành cho học sinh lớp 8 docx 2 trang Người đăng haibmt Lượt xem 6210Lượt tải 5 Download Bạn đang xem tài liệu "Đề kiểm tra môn Tin học – Free Pascal dành cho học sinh lớp 8", để tải tài liệu gốc về máy bạn click vào nút DOWNLOAD ở trên Đề kiểm tra môn Tin học – Free Pascal dành cho học sinh lớp 8 Đề kiểm tra môn Tin học – Free Pascal dành cho học sinh lớp 8 (trường Trung học phổ thông chuyên Trần Đại Nghĩa) Hãy viết chương trình: (4 điểm) Nhập số đo ba cạnh của tam giác ABC. → Đó có phải là tam giác vuông hay không Hãy viết chương trình: (4 điểm) Nhập điểm ba môn Toán, Anh, Văn → Xuất ra điểm trung bình học kì Hãy viết chương trình giải phương trình bậc nhất ax + b = 0 (2 điểm) --- HẾT --- Lưu ý: Thí sinh không được trao đổi bài hay sử dụng tài liệu Làm bài trên máy tính → chương trình Free Pascal Đáp án đề thi Tin học Viết chương trình program TamGiacVuong; uses crt; var a,b,c:Real; begin clrscr; Writeln ('Nhap so do canh AB:'); →1 điểm Readln (a); Writeln ('Nhap so do canh BC'); →1 điểm Readln (b); Writeln ('Nhap so canh CA:'); →1 điểm Readln (c); If (a*a+b*b=c*c) or (a*a+c*c=b*b) or (b*b+c*c=a*a) then writeln ('Day la tam giac vuong.') Else Writeln ('Day khong phai la tam giac vuong.'); →1 điểm Readln end. Viết chương trình program DTB; uses crt; var t,a,v,diem:Real; begin clrscr; writeln('Nhap diem hoc ki mon Anh:'); →1 điểm readln(a); writeln('Nhap diem hoc ki mon Toan:'); →1 điểm readln(t); writeln('Nhap diem hoc ki mon Van:'); →1 điểm readln(v); diem:=t+a+v; writeln('Diem trung binh cua ban trong hoc ki vua qua la: ',diem); →1 điểm readln end. Viết chương trình program PT_bac_1; uses crt; var a,b:Real; begin clrscr; Writeln ('Nhap he so a:'); →0,5 điểm Readln (a); Writeln ('Nhap he so b:'); →0,5 điểm Readln (b); If a0 then writeln ('Nghiem x la: ',-b/a:0:1) →1 điểm (thiếu :0:x (x < 3) →0,75 điểm) Else if (a=0) and (b=0) then writeln ('Phuong trinh co vo so nghiem.') →1 điểm (lộn and thành or →0 điểm) Else if (a=0) and (b0) then writeln ('Phuong trinh vo nghiem.'); →1 điểm (lộn and thành or →0 điểm) Readln end. Lưu ý: Tên program và biến không nhất thiết phải giống Kiểm tra kết quả đúng thì được điểm, sai thì mất điểm Trên 5 điểm -> đạt. Không giải thích thêm Trân trọng, học sinh trường tôi

Tài liệu đính kèm:

  • docxFree_Pascal_lop_8_viet_chuong_trinh_don_gian_de_thi_kiem_tra_45_phut.docx
Đề thi liên quan
  • docĐề cương ôn tập Tin học 8 – Học kỳ II - Năm học 2016-2017

    Lượt xem Lượt xem: 59 Lượt tải Lượt tải: 0

  • docKỳ thi chọn học sinh giỏi cấp huyện năm học 2014 – 2015 môn thi: Tin học – Thcs

    Lượt xem Lượt xem: 2065 Lượt tải Lượt tải: 2

  • docĐề kiểm tra 15p Tin học lớp 8

    Lượt xem Lượt xem: 1397 Lượt tải Lượt tải: 1

  • docĐề cương ôn tập học kì II Tin học lớp 8

    Lượt xem Lượt xem: 1191 Lượt tải Lượt tải: 0

  • docBộ đề ôn Pascal - Đề 1

    Lượt xem Lượt xem: 5090 Lượt tải Lượt tải: 1

  • docĐề kiểm tra học kì I Tin học lớp 8 (Có đáp án) - Năm học 2016-2017 - Trường THCS Trà Nú

    Lượt xem Lượt xem: 862 Lượt tải Lượt tải: 0

  • doc100 bài tập Turbo Pascal Tin học lớp 8

    Lượt xem Lượt xem: 1230 Lượt tải Lượt tải: 4

  • docĐề tài Thông qua việc sử dụng thí nghiệm ảo nhằm nâng cao chất lượng học tập của học sinh ở chương quang học môn Vật lí 9 - Trường THCS Thiện Mỹ

    Lượt xem Lượt xem: 2779 Lượt tải Lượt tải: 5

  • docMa trận đề 1 kiểm tra học kỳ I Tin học lớp 8

    Lượt xem Lượt xem: 1437 Lượt tải Lượt tải: 2

  • docĐề kiểm tra học kỳ II môn Tin học Lớp 8 - Năm học 2016-2017 - Trường THCS Nghi Mỹ

    Lượt xem Lượt xem: 57 Lượt tải Lượt tải: 0

Copyright © 2026 ThuVienDeThi.com, Thư viện đề thi mới nhất, Đề kiểm tra, Đề thi thử

Facebook Twitter

Từ khóa » đề Thi Pascal Lớp 8