Bài giảng Tin học 8 - 9

Viết chương trình tính lập phương của một số. nguyên được nhập từ bàn phím[r]

Câu Tìm lỗi sai lệnh khai báo sau sửa lại cho đúng:

a) Var start, begin: real;

b) Const x:=3.14; y:=1000;

c) Var a:=5;

d) Const ten lop =‘8A2’;

e) Var xep_loai, diem:integer, real;

f) Var nguyen1,nguyen2: integer, thuc1,thuc2: real;

g) Const ten_nhom= tin hoc;

 Var start, begina: real;

 Const x=3.14; y=1000;

 Var a:byte;

 Const tenlop =‘8A2’;

 Var xep_loai, diem:integer;

 Var nguyen1,nguyen2: integer; thuc1,thuc2: real;

Câu Hãy liệt kê lỗi (nếu có) chương trình Pascal sửa lại cho đúng

Const Pi:=3.1416;

Var cv, dt:integer

r:real;

Begin

r=5.5;

Cv=2*pi*r; Dt=pi*r*r;

Writeln(‘Chu vi la: = cv’); Writeln(‘Dien tich la: =dt’); Readln;

End.

Const Pi=3.1416;

Var cv, dt:real ;

r:integer;

Begin

r:=5.5;

Cv:=2*pi*r; Dt:=pi*r*r;

Writeln(‘Chu vi la: =’, cv); Writeln(‘Dien tich la: =‘,dt); Readln;

BÀI TẬP THỰC HÀNH

BÀI Viết chương trình tính tích số a b

(với số a số b nhập từ bàn phím)

BÀI Viết chương trình tính chu vi diện tích

một hình vng (biết cạnh hình vng nhập từ bàn phím).

BÀI Viết chương trình tính lập phương số

nguyên nhập từ bàn phím

BÀI Viết chương trình tính trung bình cộng