Var k: integer;
begin
Writeln('nhap so k: '); Readln(k);
if k mod 2 = 0 then writeln('k =', k+1)
else writeln('k=',k+2);
end.
Đúng 0
Bình luận (0)
Các câu hỏi tương tự
Viết một chương trình pascal có sử dụng các câu lệnh : khai báo biến , nhập giá trị của biến , in lên màn hình giá trị của biến , gán giá trị cho biến , câu lệnh điều kiện dạng đủ
Câu 4: Trong câu lệnh lặp: For (Biến đếm):(Giá trị đầu) to (Giá trị cuối) do (câu lệnh); Khi thực hiện ban đầu Biến đếm nhận giá trị Giá trị đầu, sau mỗi vòng lặp biến đếm tăng thêm:A. 1 đơn vị B. 2 đơn vị C. 3 đơn vị D. 4 đơn vị
Đọc tiếp
Câu 4: Trong câu lệnh lặp: For (<Biến đếm>):=(<Giá trị đầu>) to (<Giá trị cuối>) do (<câu lệnh>); Khi thực hiện ban đầu Biến đếm nhận giá trị = Giá trị đầu, sau mỗi vòng lặp biến đếm tăng thêm:
A. 1 đơn vị B. 2 đơn vị C. 3 đơn vị D. 4 đơn vị
Hãy viết chương trình nhập vào số nguyên m. Sử dụng câu lệnh điều kiện kiểm tra số m là chẵn hay lẻ. Sau đó in lên màn hình thông báo “So vua nhap la so chan!” hoặc “So vua nhap la so le!”.
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?
Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị là số chẵn trong phạm vi từ 1 dến N, sau đó in ra màn hình.
Câu lệnh điều kiện dạng đầy đủ là:
A. If < Điều kiện> then < Câu lệnh 1 >; Else < Câu lệnh 2 >;
B. If < Điều kiện> then < Câu lệnh >;
C. If < Điều kiện> then < Câu lệnh 1 >, < Câu lệnh 2 >;
D. If < Điều kiện > then < Câu lệnh 1 > Else < Câu lệnh 2 >;
Câu 3.
a) Khi nào ta có thể sử dụng câu lệnh có dạng lặp với số lần chưa xác định?
b) Câu lệnh lặp với số lần chưa xác định trước trong Pascal có dạng như thế nào?
sao lại xóa của tui ;-;Câu 1: Cú pháp lệnh của điều kiện dạng thiếu là :A. If Câu lệnh; then Điều kiện B. If Điều kiện then Câu lệnh ;C. If Điều kiện 1 then Điều kiện 2D. If Câu lệnh 1; then Câu lệnh 2;Câu 2: Khai báo biến nào sau đây là sai:A. Var a: real;B. Var a,b: real;C. Var a b: real;D. Var a, b, c: real;Câu 3: Cho a: 2; b: 3; Kết quả sau khi thực hiện câu lệnh dưới đây là: if ab then writeln(‘ab’) else writeln(‘ab’);A. abB. abC. abD. abCâu 4: Cách khai báo hằng nào sau đây là đúng:A. Co...
Đọc tiếp
sao lại xóa của tui ;-;
Câu 1: Cú pháp lệnh của điều kiện dạng thiếu là :
A. If <Câu lệnh>; then <Điều kiện >
B. If <Điều kiện> then <Câu lệnh >;
C. If < Điều kiện 1> then <Điều kiện 2>
D. If < Câu lệnh 1>; then <Câu lệnh 2>;
Câu 2: Khai báo biến nào sau đây là sai:
A. Var a: real;
B. Var a,b: real;
C. Var a b: real;
D. Var a, b, c: real;
Câu 3: Cho a:= 2; b:= 3; Kết quả sau khi thực hiện câu lệnh dưới đây là: if a=b then writeln(‘a=b’) else writeln(‘a<>b’);
A. a>b
B. a=b
C. a<b
D. a<>b
Câu 4: Cách khai báo hằng nào sau đây là đúng:
A. Const pi:=3,14 real;
B. Const pi: 3,14;
C. Const pi=3,14 real;
D. Const pi=3.14;
Câu 5: Đâu là từ khóa trong ngôn ngữ lập trình Pascal?
A. Uses;
B. Hinh_tron;
C. End;
D. A và C.
Câu 6: Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal?
A. Lop 8A;
B. Tbc;
C. Begin
D. 8B.
Câu 7: Kết quảcủa phép toán 45 div 2 mod 3 + 1 là bao nhiêu?
A. 2.
B. 7;
C. 5;
D. 3;
Câu 8: Trong ngôn ngữ lập trình Pascal, câu lệnh khai báo nào sau đây đúng?
A. var a, b : integer;
B. var x = real;
C. const x := 5 ;
D. var thong bao : string.
Câu 9: Trong ngôn ngữ lập trình Pasal, câu lệnh gán nào sau đây đúng?
A. x := real;
B. y = a +b;
C. z := 3;
D. i = 4.
Câu 10: Xét chương trình sau:
Var x: integer;
Begin
x:=1;
y:= 5;
Writeln(x+y);
Readln;
End.
Kết quả của chương trình trên là:
A. 1
B. 5
C.6
D. Tất cả đều sai.
Nếu điểm trung bình lớn hơn hoặc bằng 5 thì lên lớp ngược lại thì thi lại. Hãy chọn câu lệnh điều kiện đúng với mệnh đề trên.A. if DTB 5 then writeln( ‘Len lop’) ;B. if DTB 5 then writeln( ‘ Thi lai’) ;C. If DTB 5 then writeln( ‘Len lop’) ; else then writeln( ‘ Thi lai’) ;D. If DTB 5 then writeln( ‘Len lop’) else then writeln( ‘ Thi lai’) ;
Đọc tiếp
Nếu điểm trung bình lớn hơn hoặc bằng 5 thì lên lớp ngược lại thì thi lại. Hãy chọn câu lệnh điều kiện đúng với mệnh đề trên.
A. if DTB >5 then writeln( ‘Len lop’) ;
B. if DTB < 5 then writeln( ‘ Thi lai’) ;
C. If DTB >=5 then writeln( ‘Len lop’) ; else then writeln( ‘ Thi lai’) ;
D. If DTB >=5 then writeln( ‘Len lop’) else then writeln( ‘ Thi lai’) ;