Những câu hỏi liên quan
phạm ngọc hân
Xem chi tiết
Nguyễn Thuỳ Linh
Xem chi tiết
Nguyễn Lê Phước Thịnh
4 tháng 5 2021 lúc 13:57

uses crt;

var n,x:integer;

begin

clrscr;

write('Nhap n='); readln(n);

writeln('n=',n);

x:=n;

if x mod 2=0 then writeln(x,' la so chan')

else writeln(x,' la so le');

readln;

end.

Bình luận (0)
/-.-/
nhật nguyên
Xem chi tiết
Nguyễn Phương Anh
Xem chi tiết
Lihnn_xj
21 tháng 2 2022 lúc 13:22

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.

Bình luận (3)
Nguyễn Lê Phước Thịnh
21 tháng 2 2022 lúc 13:23

Câu 1: B

Câu 2: C

Câu 3: D

Câu 4: D
Câu 5; D

Câu 6: B

Câu 7: A

Câu 8: A

Câu 9: C

Câu 10: C

Bình luận (0)
cute pho mai que
Xem chi tiết
☞Tᖇì  ᑎGâᗰ ☜
27 tháng 3 2022 lúc 20:49

Cắt bớt ra cậu oy._.

Bình luận (0)
Mạnh=_=
27 tháng 3 2022 lúc 20:50

tách ra

Bình luận (0)
qlamm
27 tháng 3 2022 lúc 20:50

tách bớt cho dễ lm đi ạ

Bình luận (0)
Quốc Việt A Nguyễn
Xem chi tiết
Quốc Việt A Nguyễn
18 tháng 12 2022 lúc 20:44

giúp mik vs

 

Bình luận (0)
HAT9
18 tháng 12 2022 lúc 22:19

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.

Bình luận (0)
Thiên Bình
Xem chi tiết
Phía sau một cô gái
7 tháng 4 2023 lúc 20:39

program TimSoLonNhat;

var

     a, b, c, d, max: integer;

begin

     write('Nhap a: '); readln(a);

     write('Nhap b: '); readln(b);

     write('Nhap c: '); readln(c);

     write('Nhap d: '); readln(d);

     max := a;

     if b > max then

          max := b;

     if c > max then

          max := c;

     if d > max then

          max := d;

     writeln('So lon nhat la: ', max);

     readln;

end.

Bình luận (0)
Nguyễn Hoàng Duy
7 tháng 4 2023 lúc 23:53

program TimSoLonNhat;

var a, b, c, d: integer; 

begin
  writeln('Nhap vao gia tri cua a: ');
  readln(a);
  writeln('Nhap vao gia tri cua b: ');
  readln(b);
  writeln('Nhap vao gia tri cua c: ');
  readln(c);
  writeln('Nhap vao gia tri cua d: ');
  readln(d);

  if (a > b) and (a > c) and (a > d) then
    writeln('So lon nhat la: ', a)
  else if (b > a) and (b > c) and (b > d) then
    writeln('So lon nhat la: ', b)
  else if (c > a) and (c > b) and (c > d) then
    writeln('So lon nhat la: ', c)
  else
    writeln('So lon nhat la: ', d);
    readln;
end.

Bình luận (0)
Nguyễn Phương Anh
Xem chi tiết
Kudo Shinichi
21 tháng 2 2022 lúc 13:18

Sao lại kiểm tra 15 phút z =))

Bình luận (1)
Lihnn_xj
21 tháng 2 2022 lúc 13:21

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.

Bình luận (0)