Câu hỏi:

04/04/2024 39

Cho chương trình Pascal sau:

Program dientich_duongtron;

uses : crt;

const pi = 3.14;

var dt, r = real;

Hãy chỉ ra bốn lỗi có trong chương trình, sau đó hãy sửa lại cho đúng

Trả lời:

verified Giải bởi Vietjack

a) uses crt;

b) var dt, r: real;

c) Thiếu readln(r);

d) dt:= pi*sqr(r);

CÂU HỎI HOT CÙNG CHỦ ĐỀ

Câu 1:

Trong Pascal, khai báo nào sau đây sai:

Xem đáp án » 04/04/2024 64

Câu 2:

Biểu thức 5*b + a div 4*3 với a =16, b = 3 có giá trị là:

Xem đáp án » 04/04/2024 59

Câu 3:

Cho đoạn chương trình sau:

IF <điều kiện> THEN write(x,’la so chan’) ELSE write(x,’la so le’);

Điều kiện là biểu thức logic nào dưới đây?

Xem đáp án » 04/04/2024 57

Câu 4:

Trong Pascal, câu lệnh ghép được thực hiện khi sau then hoặc else:

Xem đáp án » 04/04/2024 53

Câu 5:

Viết chương trình tính tổng các giá trị là bội của 5 trong phạm vi từ 1 đến N

(Số nguyên dương N được nhập vào từ bàn phím)

Xem đáp án » 04/04/2024 53

Câu 6:

Chọn biểu diễn tên đúng trong các biểu diễn dưới đây:

Xem đáp án » 04/04/2024 52

Câu 7:

Xét biểu thức logic: (n >0) and (n mod 2 = 1). Khẳng định nào sau đây là đúng?

Xem đáp án » 04/04/2024 51

Câu 8:

Trong Pascal, cú pháp câu lệnh rẽ nhánh if-then dạng thiếu là:

Xem đáp án » 04/04/2024 50

Câu 9:

Cú pháp khai báo trực tiếp biến mảng một chiều có dạng:

Xem đáp án » 04/04/2024 49

Câu 10:

Phát biểu nào dưới đây là hợp lí nhất khi nói về biến:

Xem đáp án » 04/04/2024 48

Câu 11:

Cho khai báo biến sau đây:

Var m, n : integer ;

x, y : real ;

Lệnh gán nào sau đây là sai ?

Xem đáp án » 04/04/2024 48

Câu 12:

Hãy viết các biểu thức toán học sau sang dạng tương ứng trong Pascal:

Xem đáp án » 04/04/2024 47

Câu 13:

Biểu diễn nào dưới đây là biểu diễn hằng trong Pascal:

Xem đáp án » 04/04/2024 46

Câu 14:

Cho đoạn chương trình:

readln(x,y);

IF x > y THEN F:= 2*x – y ELSE

IF x < y THEN F:= sqr(x) + sqr(y) ELSE F:= 2*x;

Nếu nhập vào từ bàn phím x=0 và y=0 thì giá trị của F là:

Xem đáp án » 04/04/2024 46

Câu 15:

Cho đoạn chương trình sau:

S := 0 ;

FOR i := 1 to 10 DO

IF i mod 2 = 1 THEN S := S + i ;

Sau khi thực hiện, S có giá trị?

Xem đáp án » 04/04/2024 45