Viết chương trình kiểm tra số nguyên dương A nhập từ bàn phìm là số chẵn hay số lẻ... Bài tập 3:?[r]
(1)(2)1 Bài tập 1:
15 18
3
10
10 24
Viết biểu thức toán học sau dạng biểu thức Pascal?
(3)1 Bài tập 1:
a) 15*4-30+12
b) [(15+5)/(3+1)]-[18/(5+1)] a)[(10+2)^2]/(3+1)
d) [(10+2)^2-24]/(3+1)
2 Bài tập 2:
Sau câu lệnh sau a) IF ( 45 mod 3) = then X:= X + 1;
b) IF x > 10 then X:= X + 1;
Giá trị biến X bao nhiêu, trước giá trị X 5?
a) Giá trị biến X =
b) Giá trị biến X =
Đáp án:
a) Giá trị biến X =
(4)1 Bài tập 1:
a) 15*4-30+12
b) [(15+5)/(3+1)]-[18/(5+1)] a)[(10+2)^2]/(3+1)
d) [(10+2)^2-24]/(3+1)
2 Bài tập 2:
a) Giá trị biến X =
b) Giá trị biến X =
3 Bài tập 3:
Viết chương trình kiểm tra số nguyên dương A nhập từ bàn phìm số chẵn hay số lẻ
Có biến chương trình? Kiểu liệu?
Có biến biến A có kiểu liệu Integer
Làm để biết số nguyên dương A số chẵn hay số lẻ
(5)1 Bài tập 1:
a) 15*4-30+12
b) [(15+5)/(3+1)]-[18/(5+1)] a)[(10+2)^2]/(3+1)
d) [(10+2)^2-24]/(3+1)
2 Bài tập 2: Đáp án:
a) Giá trị biến : X = b) Giá trị biến : X =
3 Bài tập 3:
Viết chương trình kiểm tra số nguyên dương A nhập từ bàn phìm số chẵn hay số lẻ
Program Kiem_tra_so_chan_le; Var A: Integer;
Begin
Writeln(‘Nhap so A:’); Readln(a);
If A mod = then
Writeln(A,’la so chan’) Else Writeln(A,’la so le’);
Readln; End
Program Kiem_tra_so_chan_le; Var A: Integer;
Begin
Writeln(‘Nhap so A:’); Readln(a);
If A mod = then
Writeln(A,’la so chan’) Else Writeln(A,’la so le’);
(6)Bài vừa học :
- Về nhà xem lại tập giải.
- Làm tập lại sách tập vào tập. Bài học :
- Tiết sau: “ Bài tập” (tt) - Làm tập:
Bài 1: Viết chương trình tính tổng số nguyên
dương nhập từ bàn phím
Bài 2: Viết chương trình tính diện tích chu vi hình chữ
(7)Var a, b : interger; S : real;
Bài 1: Viết chương trình tính tổng số ngun
dương nhập từ bàn phím
(8)Có biến chương trình? Kiểu liệu?
Bài 2: Viết chương trình tính diện tích chu vi hình chữ nhật
(9)