Biết rằng điểm cộng nhập từ bàn phím.Em hãy sắp xếp các câu lệnh trong chương trình sau thành 1 chương trình hoàn chỉnh.. Biết rắng yêu cầu của đề bài như sau: tính điểm trung bình các[r]
(1)BÀI TAP ÔN CÂU LỆNH ĐIỀU KIỆN
1 Em cho ví dụ sử dụng cấu trúc rẽ nhánh sống thường gặp Cho biết câu lệnh sau không hợp lệ Vì sao?
a) If a > then write(a); b) If x:=a then x:=x+1; c) If a > b then max:=a;
d) If > then write(“ gia tri khong dung”); Cho câu lệnh sau:
If a>b then a:= a-b else a:=b-a;
Phát biểu sau Giải thích
a) Sau thực câu lệnh trên, a >= b) Sau thực câu lệnh trên, a > c) Sau thực câu lệnh trên, a <= d) Sau thực câu lệnh trên, a <
4 Một cửa hàng dụng cụ học sinh thực đợt khuyến với thơng báo sau Nếu
tổng hóa đơn mua hàng 200.000 đồng giảm 10% tổng giá tiền Bạn Thanh tính nhẩm số tiền vật dụng mua khoảng 178.000 đồng Vây theo em, bạn Thanh có giảm tiền khơng Vì sao?
5 Cho câu lệnh sau đây:
a If > then write( nho hon 6);
b If a := b then Writeln (‘ a la gia tri lon nhat’); c If a < b then a:= b-a;
d If a = b then writeln(‘ a bang b’);
Em cho biết câu lệnh sai Vì sao?
6 Quan sát đoạn chương trình sau, cho biết kết a, b bao nhiêu? Program vidu;
Var a, b: integer; Begin
a:= 10; b:=7;
if a > 15 then b:= a – b; a:= a + b;
writeln( ‘gia tri cua a, b: ‘, a, b); end
7 Bạn An viết chương trình tìm giá trị nhỏ số a, b nhập từ bàn phím Em cho biết, chương trình bạn An viết chưa Nếu chưa em giúp bạn An sửa lại
1
(2)3 10
Begin
Write(‘ nhap gia tri a, b’); Readln(a,b);
If a < b then
Writeln (‘a la gia tri nho nhat’); Else writeln (‘ b la gia tri nho nhat’); Readln;
End;
8 Bạn Anh muốn hoán đổi giá trị a b, giá trị a lớn giá trị b Theo em bạn viết đoạn chương trình việc hóan đổi giá trị a b chưa Vì sao? Theo em phải làm sao?
1
If a > b then Tam:= a; a:= b; b:=tam;
Em cho biết chương trình cho kết gì? Vì sao? Nếu điểm trung bình nhập vào 8.6
10.Viết chương trình nhập số nguyên a Cho biết a có phải số chẵn khơng
11.Lớp A có quy định, hàng tháng tổng kết điểm số Học sinh có điểm cộng lớn 40 xếp loại A, cịn lại xếp loại B Em hồn tất chương trình theo điều kiện Biết điểm cộng nhập từ bàn phím.Em xếp câu lệnh chương trình sau thành chương trình hồn chỉnh Biết rắng u cầu đề sau: tính điểm trung bình mơn Văn, Tốn, Tin Biết điểm mơn nhập từ bàn phím In hình xếp loại học lực học sinh sau:
- Nếu điểm trung bình >= 8, xếp loại Giỏi - Nếu điểm trung bình >= 6.5, xếp loại Khá - Cịn lại in câu: Bạn cố gắng lên
2 10 11 12 13
Program XepLoai; Var DTB: real; Begin
Write(‘ nhap diem trung binh cua hoc sinh’); Readln(DTB);
If DTB >= 8.0 then begin
Writeln (‘Xin chuc mung’)
Writeln (‘ Ban dat danh hieu hoc sinh gioi’); end;
writeln( ‘ Ban co muon tiep tuc khong?’); Readln;
(3)1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
Begin
Program Dtbinh;
Var Van, Toan, Tin, DTB: real; Write(‘ Nhap diem mon Van:’); Readln(Toan);
Write(‘ Nhap diem mon Toan:’); Readln(Van);
Write(‘ Nhap diem mon Tin:’); Readln(Tin);
DTB:= (Van + Toan + Tin)/3;
If DTB >= then writeln(‘ chuc mung ban la hoc sinh gioi’)
Else writeln(‘ ban hay co gang len’);
Writeln(‘chuc mung ban la hoc sinh kha’) Else if DTB >=6.5 then
Readln End
12.Viết chương trình nhập số nguyên x, y Biết x, y cạnh hình chữ nhật.In hình giá trị chiều dài, chiều rộng hình chữ nhật
13.Một nhà sách có chế độ khuyến mãi, bạn mua từ sách trở lên giảm 10% tổng số tiền toán Biết số sách giá tiền nhập từ bàn phím 14.Viết chương trình giải phương trình bậc ax+b = với a, b nhập từ bàn phím
Bạn An tổ giao nhiệm vụ tổ chức trò chơi máy tính để khởi động cho lớp tiết sinh hoạt chủ nhiệm Bạn suy nghĩ đến chương trình mà người chơi thực theo yêu cầu máy tính đưa Yêu cầu cụ thể sau:
- Nhập ký tự A yêu cầu vỗ tay - Nhập ký tự B hát tình bạn
- Nhập ký tự C định người khác lên chơi tiếp Theo em, bạn An làm nào?