Bài 1:
Ta nhớ thực hiện lệnh
<biến đếm>:=<giá trị>;
Bài 2:
d:=d+2;
Cùng các bạn trong nhóm thảo luận và trả lời câu hỏi sau:
Xét chương trình sau:
Const
a=20;
d= TRUE
Var
b: integer; x: real; c: char:
Begin
write (' Hay nhap gia tri cho b: ') ; readln(b) ;
write (' Hay nhap gia tri cho c: ') ; readln(c) ;
...
readln;
End.
Khi thực hiện chương trình, nếu người sử dụng giá trị 18 cho biến b và nhập kí tự 'k' cho biến c thì từng lệnh dưới đây sẽ hiển thị kết quả gì lên màn hình khi đc thay vào chỗ dấu 3 chấm ?(không sử dụng Free Pascal để chạy thử)
Lệnh 1. writeln ( (36-5*2) div 3) ;
Lệnh 2.writeln ( (8 mod 3) <> 2);
Lệnh 3. writeln (b/6) ;
Lệnh 4. writeln (b/6 :10:2) ;
Lệnh 5. writeln (a/6:10:2) ;
Lệnh 6. writeln (b/6<=a/5) ;
Lệnh 7. writeln (c='K') ;
Lệnh 8. writeln (d) ;
Em hãy dùng Free Pascal để kiểm tra lại ý kiến của mình trong bài tập trên
Câu 1: Giả sử có khai báo sau,
Var X, Y, Z:integer;
Và có giá trị lần lượt là X:= 2; Y:= 6; Z:= 3;
Thì phép gán nào dưới đây không hợp lệ?
A) X:= Y + Z; B) X:= Y –Z; C) X:= Y*Z; D) X:= Y/Z;
Câu 2: X có kết quả bao nhiêu sau khi thực hiện đoạn lệnh sau:
Y:= 345;
X:= Y mod 10 + Y div 10 + Y div 100;
A) 5 B) 42 C) 12 D) 39
Câu 1: Giả sử có khai báo sau,
Var X, Y, Z:integer;
Và có giá trị lần lượt là X:= 2; Y:= 6; Z:= 3;
Thì phép gán nào dưới đây không hợp lệ?
A) X:= Y + Z; B) X:= Y –Z; C) X:= Y*Z; D) X:= Y/Z;
Câu 2: X có kết quả bao nhiêu sau khi thực hiện đoạn lệnh sau:
Y:= 345;
X:= Y mod 10 + Y div 10 + Y div 100;
A) 5 B) 42 C) 12 D) 39
1. Câu lệnh đưa dữ liệu ra màn hình
A. cin>>biến vào>>biến vào<<...;
B. cin<<kết quả ra<<kết quả ra<<...;
C. cout>> biến vào>>biến và>>...;
D. cout<<kết quả ra<<kết quả ra<<...;
2. Ngôn ngữ lập trình là
A. Ngôn ngữ dùng để viết các chương trình máy tính
B. Các dãy bit (dãy các số chỉ gồm 0 và 1)
C. Chương trình dịch
D. Là ngôn ngữ dành riêng cho máy tính
3. Dữ liệu kiểu số nguyên là:
A. float
B. int
C. bool
D. double
4. Đâu là từ khóa?
A. baitap
B. include
C. min
D. max
5. Phép chia lấy phần dư là:
A. /
B. *
C. %
D. &
Xác định INPUT, OUTPUT của các bài toán sau:
Tìm giá trị tuyệt đối của 1 số nguyên a cho trước.
Tính tổng các phần tử dương của dãy n số thực cho trước.
Tính số các số chẵn trong dãy n số thực cho trước
Tính Tổng 50 số tự nhiên đầu tiên
. Giup m z nhae
1. Viết khai báo cho các biến sau: biến A kiểu số nguyên, biến B kiểu số thực, biến C kiểu kí tự, biến R kiểu xâu kí tự. 2. viết chương trình nhập vào 2 số A,B. Tính và in ra tích 2 số A,B
Giả sử có khai báo sau,
Var a,b:integer;
tinh:real;
thì phép gán nào là hợp lệ?
A) a:=5.3; B) b:= 3.0; C) tinh:=2; D) a:=b+tinh;
Giúp e vs ạ >×<
1. Trong pascal viết câu lệnh nhập giá trị cho mảng Diemtin gồm 42 phần tử thuộc kiểu dữ liệu số thực?
2. Trong pascal viết câu lệnh tính điểm trung bình cho các bạn học sinh trong lớp trong đó điểm tb= ( Diemtoan+ Diemvan)/2; lớp có 36 hs)
2. Xét bài toán sau: Tìm số lớn hơn trong hai số a,b (a khác b)
a/ Mô tả thuật toán bằng ngôn ngữ tự nhiên.
b/ Hãy sử dụng lập trình Scratch để diễn đạt thuật toán của bài toán.
