: Điều kiện sau là đúng hay sai ?
X:=7;
If (X mod 3 =1) and (X div 5 =1) then
X:=7;
A. Đúng B. Sai
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;
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
Vẽ lưu đồ thuật toán: S = x1 + x2 + x3 + ... + xn
Help me!!
kết quả của phép toán 45 div 2 mod 3+1
em hãy viết các điều kiện dưới đây trong ngôn ngữ pascal;
a) X là một số nguyên chia hết cho 4
b) Y là một số nguyên không chia hết cho 5
c) tổng của hai trong ba số a,b,c luôn lớn hơn số còn lại.
Cho biết kết quả của việc thực hiện thuật toán
Sau:
Thuật toán 1: Bước 1:a88§;bB I
Bước 2:aBa+b
Bước 3: bBa-b
Bước 4: aBa-b
Bước 5: Thông báo kết quả của a và b.
Thuật toán 2: Bước I:x810;y83;
Bước 2:xB x -l;y8 y+l;
Bước 3: Nếu x>y thì quay lại B2.
Bước 4: Thông báo kết quả x và y.
Thuật toán 3: Bước 1:a81;b89;
Bước 2:afb-a;bBb-l;
Bước 3: Nếu a<b thì quay lại bước 2;
Bước 4: Thông báo kết quả của a và b.
Thuật toán 4: Bước l: xB2;yB9;
Bước 2: xBx*+y;
Bước 3: yBx-y;
Bước 4: xBx-y;
Bước 5: Thông báo kết quả của x và y. giup z nhae