Câu hỏi:

11/07/2024 3,643

Có một số câu lệnh trong chương trình sau viết không đúng, em hãy sửa lại cho đúng:
Program Soam Soduong;
uses crt
var A, B: integer;
Begin
clrscr;
writeln(Nhap so A: );
readln(A);
if A > 0 then writeln(A,’ la so duong ‘);
else writeln(A,‘ la so am ’);
readln;
End.

Câu hỏi trong đề: Top 4 Đề thi Tin học 8 Học kì 1 có đáp án !!

Sách mới 2k7: Bộ 20 đề minh họa Toán, Lí, Hóa, Văn, Sử, Địa…. form chuẩn 2025 của Bộ giáo dục (chỉ từ 49k/cuốn).

Đề toán-lý-hóa Đề văn-sử-địa Tiếng anh & các môn khác

Câu 1:

Trong Pascal, cú pháp câu lệnh gán là:

A. Biểu thức := Tên biến;

B. Biểu thức = Tên biến;

C. Tên biến = Biểu thức;

D. Tên biến:= Biểu thức;

Xem đáp án » 26/06/2020 86,753

Câu 2:

Phát biểu nào dưới đây sai ?

A. Trong một chương trình, phần khai báo có thể có hoặc không.

B. Trong một chương trình, phần thân chương trình có thể có hoặc không.

C. Trong một chương trình, phần thân chương trình bắt buộc phải có.

D. Cả A và C đều đúng.

Xem đáp án » 26/06/2020 68,336

Câu 3:

Trong các tên sau đây, tên nào không hợp lệ trong ngôn ngữ lập trình Pascal?

A. A2;

B. Tamgiac;

C. 8a;

D. Chuongtrinh;

Xem đáp án » 26/06/2020 57,621

Câu 4:

Để chạy chương trình trong ngôn ngữ Pascal ta dùng tổ hợp phím nào?

A. Ctrl + F9

B. Shift –F9

C. Alt – F9

D. F9

Xem đáp án » 26/06/2020 40,303

Câu 5:

Trong Pascal, câu lệnh gán nào dưới đây sai ?

A. a:= b;

B. a + b := c;

C. a:= a + 1;

D. x:= 2*x;

Xem đáp án » 26/06/2020 35,186

Câu 6:

Cách khai báo hằng đúng là:

A. Const pi:=3,14 real;

B. Const pi: 3,14;

C. Const pi=3,14 real;

D. Const pi=3,14;

Xem đáp án » 26/06/2020 26,641

Câu 7:

Nhập 2 số nguyên a, b từ bàn phím. Viết chương trình tính tổng 2 số a, b. Để khai báo cho bài toán trên ta sử dụng câu lệnh khai báo nào?

A. Var a , b, tong : real;

B. Var a, b, tong : integer;

C. Var a, b, tong : char;

D. Var a, b, tong : string;

Xem đáp án » 26/06/2020 20,367

Có một số câu lệnh trong chương trình sau viết không đúng, em hãy sửa lại cho đúng:
Program Soam Soduong;
uses crt
var A, B: integer;
Begin
clrscr;
writeln(Nhap so A: );
readln(A);
if A > 0 then writeln(A,’ la so duong ‘);
else writeln(A,‘ la so am ’);
readln;
End.

Nhà sách VIETJACK: