Tất cả các câu lệnh trong Pascal đều kết thúc bởi dấu
Dấu ; (dấu chấm phẩy) trong chương trình Free Pascal dùng để:
Kết thúc một chương trình.
Chạy chương trình .
Kết thúc một câu lệnh.
Xem kết quả.
Viết các câu lệnh trong pascal theo yêu cầu sau: 1.nhập số nguyên :x 2.Gán bình phương của x vào y 3. Xuất ra giá trị của y 4. Kết thúc chương trình
uses crt;
var x,y:integer;
begin
clrscr;
readln(x);
y:=sqr(x);
writeln(y);
readln;
end.
Trong ngôn ngữ lập trình pascal từ readln được kết thúc bằng:
A. Dấu chấm
B. Dấu chấm phẩy
C. Dấu chấm hỏi
D. Không có các dấu trên
Dấu nào dùng để phân cách các lệnh trong Pascal?
Tham khảo v
Các câu lệnh trong Pascal được ngăn cách bằng dấu chấm phẩy (";"). Câu lệnh cuối cùng của một khối lệnh có thể giản lược đi một dấu chấm phẩy. Cuối chương trình luôn có một dấu chấm sau end (end.). begin writeln('Hello World'); end.
Câu 25 Đoạn lệnh sau đây
x:=1;
While x<=10 do
x:=x+1;
Khi nào thì kết thúc vòng lặp While .. do trên?
A. Khi x<10 B. Khi x = 10 C. Khi x <=10 D. Khi x>10
Câu 26: Trong ngôn ngữ Pascal, đoạn chương trình sau đưa ra màn hình kết quả gì?
For i:=1 to 5 do write (i:3);
A. 1 2 3 4 5 B. 5 4 3 2 1
C. Đưa ra i:3 D. Không đưa ra kết quả gì
Câu 27: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng:
A. If a=5 then a:=d+1; else a:=d+2; B. If a=5 then a:=d+1 else a:=d;
C. If a:=5 then a=d+1; else a=d+2; D. If a<=5 then a:=d+1 else; a:=d+2;
Câu 28: Cho đoạn chương trình Pascal sau:
For i := 1 to 5 do
Begin
y := i;
End;
Sau khi thực hiện đoạn chương trình trên, giá trị của y là bao nhiêu?
A. 3 B. 4 C. 5 D. 6
Câu 29: Để tính tổng S=2 + 4 + 6 … + n; em chọn đoạn lệnh:
A. For i:=1 to n do if ( i mod 2)=0 then S:=S + i;
| B. For i:=1 to n do S:= S + i; |
C. c. For i:=1 to n do if ( i mod 2)=1 then S:=S + i; | D. for i:=1 to n do if ( i mod 2)<>0 then S:=S + i; |
Câu 30: Cho đoạn chương trình Pascal sau:
x:=3;
For i:=1 to 7 do x:= x+1;
Sau khi thực hiện câu lệnh For, giá trị của x là bao nhiêu?
A. 9 B. 7 C. 10 D. 3
Câu 31: Tìm giá trị của S trong đọan chương trình dưới đây:
S := 0;
For i := 1 to 5 do S := S + i;
A. S = 0 B. S = 1 C. S = 5 D. S = 15
Câu 8: Lúc nào thì câu lệnh lặp While..Do sẽ dừng lại?
A. <Điều kiện> có giá trị đúng.
B. < Điều kiện> có giá trị sai.
C. Các câu lệnh bên trong < câu lệnh> đã thực hiện xong.
D. Tất cả phương án trên đều sai.
Câu 9: Chọn cú pháp câu lệnh lặp là:
A. for < biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >;
B. for < biến đếm > := < giá trị cuối > to < giá trị đầu > do < câu lệnh >;
C. for < biến đếm > = < giá trị đầu > to < giá trị cuối >; do < câu lệnh >;
D. for < biến đếm > = < giá trị đầu > to < giá trị cuối > do < câu lệnh >;
giúp với ạ
nêu cấu trúc, ý nghĩa của câu lệnh nhập dữ liệu từ bàn phím, câu lệnh thông báo kết quả ra màn hình, câu lệnh gán, câu lệnh điều kiện trong Pascal?
Câu 1:Vòng lặp While – do kết thúc khi nào
A. Khi một điều kiện cho trước được thỏa mãn
B. Khi đủ số vòng lặp
C. Khi tìm được Output
D. Tất cả các phương án
Câu 2:Việc đầu tiên mà câu lệnh While ... do cần thực hiện là gì?
A. Thực hiện < câu lệnh > sau từ khóa Do
B. Kiểm tra giá trị của < điều kiện >
C. Thực hiện câu lệnh sau từ khóa Then
D. Kiểm tra < câu lệnh >
Câu 3:Cho biết câu lệnh sau Do thực hiện mấy lần trong đoạn chương trình sau:
i := 5;
While i>=1 do i := i – 1;
A. 1 lần
B. 2 lần
C. 5 lần
D. 6 lần
Câu 4:Hãy cho biết kết quả của đoạn chương trình dưới đây:
a:=10; While a < 11 do write (a);
A. Trên màn hình xuất hiện một số 10
B. Trên màn hình xuất hiện 10 chữ a
C. Trên màn hình xuất hiện một số 11
D. Chương trình bị lặp vô tận
Câu 5:Câu lệnh sau giải bài toán nào:
While M <> N do
If M > N then M:=M-N else N:=N-M;
A. Tìm UCLN của M và N
B. Tìm BCNN của M và N
C. Tìm hiệu nhỏ nhất của M và N
D. Tìm hiệu lớn nhất của M và N
Câu 1: A
Câu 2: B
Câu 3: C
Câu 4: A
Câu 5: A
u 3: Đánh dấu [x] vào ô đúng hoặc sai tương ứng trong các câu lệnh Pascal trong chương trình tính tổng 10 số tự nhiên đầu tiên, nếu sai sửa lại?
Câu lệnh Đúng Sai Sửa lại
Program Chuong trinh
Var i,s : real;
Const n:=10;
Begin
Wile i <=n do;
Begin
S:=s+i
i =i+1
End.
Writeln(s)
Readln
End;
giúp mik với mình cần gấp ạ