Số lần lặp của câu lệnh S:=S+i; sau là bao nhiêu lần?
For i:= 0 to 5 do
S:=S+i;
a. 5 b. 1 c. 0 d. 6
Nêu cú pháp của câu lệnh lặp với số lần chưa biết trước. Giải thích các thành phần, vẽ sơ đồ hoạt động của câu lệnh
Trong Pascal, câu lệnh lặp với số lần chưa biết có cú pháp:
Em hãy sắp xếp chương trình tính tổng N số tự nhiên sau cho phù hợp?
Var N, i: integer;
Write(‘Nhap so N=’); s:=0;
S: Longint; readln(n);
For i:=1 to n do
Begin
Program tinh_tong;
S:=s+i;
Writeln(‘Tong cua ‘, N, ‘ So tu nhien dau tien s=’, s);
End.
Readln
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. Nêu cách khai báo biến mảng trong pascal? Khi nòa nên dung biến mảng?
2. em hay khai báo 1 biến mảng 50 phần tử kiểu xâu ký tự?
3. Viết chương trình tính tổng chẵn, lẽ của 10 số bất kỳ nhập vào từ bàn phím
4. Viết chương trình kiểm tra 1 số nhập vào là số chẵn hay lẻ thông báo kết quả
5. Hãy cho biết vòng lặp sau chạy mấy lần? vì sao?
a. K:=7;
While (K=7) Do write(“ lap lan thu may”);
b. H:=3;n:=6;
While (n<= 20) Do H:=H+n;
c. For F:=3 to 23 do readln;
nhập n là số nguyên từ bàn phím và thực hiện + nếu n là số Chẵn thì S=2+4+6+.....+n + nếun là số lẻ thì S=1+3+5+...+n
giup minh vs mn
trình bày và giải thích câu lệnh lặp
For...to...do
ưhile...do
cho vd
mn giúp tớ giả câu này vs ạ ..