Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

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.

/-.-/
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.

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

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._.

Mạnh=_=
27 tháng 3 2022 lúc 20:50

tách ra

qlamm
27 tháng 3 2022 lúc 20:50

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

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

 

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.

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.

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.

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 =))

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.