Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (63.83 KB, 2 trang )
<span class='text_page_counter'>(1)</span><div class='page_container' data-page=1>
PHÒNG GIÁO DỤC VÀ ĐÀO TẠO NINH HỊA
<b>TRƯỜNG THCS ĐÀO DUY TỪ</b> <b>ĐỀ CƯƠNG ƠN TẬP GIỮA HỌC KÌ I<sub>NĂM HỌC 2020-2021</sub></b>
<b>MƠN TIN HỌC KHỐI 8</b>
<b>Bài 1: Sửa lỗi chương trình sau:</b>
<b>Program sua loi</b>
<b>Var a,b:=integer</b>
<b>Begin</b>
<b>a:=21;</b>
<b>b:=a/5;</b>
<b>Write(b);</b>
<b>Readln</b>
<b>End.</b>
<b>Bài 2 : Viết chương trình in ra câu thơng báo “ Toi la hoc sinh lop 8”.</b>
<b>Program thôngbao;</b>
<b>Uses crt;</b>
<b>Begin</b>
<b>Clrscr;</b>
<b>Write(‘Toi la hoc sinh lop 8’);</b>
<b>Readln</b>
<b>End.</b>
<b>Bài 3: Viết chương trình tính tổng và tích hai số thực nhập từ bàn phím.</b>
<b>Program tong-tich ;</b>
<b>Uses crt;</b>
<b>Var a, b, p, s : real;</b>
<b>Begin</b>
<b>Clrscr;</b>
<b>Write(‘Nhap a = ‘); readln(a);</b>
<b> Write(‘Nhap b = ‘); readln(b);</b>
<b>s := a + b;</b>
<b>p := a * b;</b>
<b>Writeln(‘Tong cua a và b la:’, s : 8: 2);</b>
<b>Writeln(‘Tich cua a và b la: ‘, p : 8: 2 ) ; </b>
<b>Readln;</b>
<b>End.</b>
<b>Bài 4: Viết chương trình tính chu vi, diện tích hình vng với độ dài cạnh của nó là một</b>
số nguyên nhập từ bàn phím.
<b>Program hinhvuong;</b>
<b>Uses crt; </b>
<b>Var a: integer;</b>
<b> p, s : real;</b>
<b>Begin</b>
<b>Clrscr;</b>
<b>Write(‘Nhap a = ‘); readln(a);</b>
<b>s := a*a</b>
<b>p := 4*a;</b>
<b>Readln</b>
<b>End.</b>
<b>Bài 4: Viết chương trình tính chu vi, diện tích hình chữ nhật với độ dài hai cạnh của nó là</b>
các số thực được nhập từ bàn phím.
<b>Program hinh-chu-nhat;</b>
<b>Uses crt; </b>
<b>Var a, b, p, s : real;</b>
<b>Begin</b>
<b>Clrscr;</b>
<b>Write(‘Nhap a = ‘); readln(a);</b>
<b>Write(‘Nhap b =’); readln(b);</b>
<b>p := (a+b)*2;</b>
<b>s := a*b;</b>
<b>Writeln(‘Chu vi hình chu nhat la: ‘, p : 6: 2 ) ; </b>
<b>Writeln(‘Dien tich hinh chu nhat la: ‘, s : 6: 2);</b>
<b>Readln</b>
<b>End.</b>
<b>Bài 5: Viết chương trình</b>
a/ Nhập hai số nguyên x, y từ bàn phím. In giá trị x và y ra màn hình.
b/ Hốn đổi giá trị x và y, sau đó in giá trị x và y ra màn hình.
<b>Program hoan_doi;</b>
<b>Uses crt; </b>
<b>Var x,y,z: integer;</b>
<b>Begin</b>
<b>Clrscr;</b>
<b> read(x,y);</b>
<b> Write(x,’ ’,y); </b>
<b>z := x</b>
<b>x := y;</b>
<b>y:=z;</b>
<b>writeln(x,’ ‘,y);</b>
<b>Readln</b>
<b>End.</b>