Câu hỏi:

04/04/2024 38

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)

Trả lời:

verified Giải bởi Vietjack

Program bt_3;

Uses crt;

Var Tong, n, i: integer;

Begin

 Clrscr;

 Writeln(‘nhap n=’);

 Readln (n);

 Tong:=0;

 For i:=1 to n do

 If I mod 5 = 0 then Tong:= Tong+i;

 Writeln(‘Tong la:’,Tong);

 Readln

End.

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

Câu 1:

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 46

Câu 2:

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 41

Câu 3:

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 36

Câu 4:

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 35

Câu 5:

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

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

Câu 6:

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 35

Câu 7:

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 33

Câu 8:

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 32

Câu 9:

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

T := 0 ; i:=1;

WHILE i <= 10 DO

BEGIN

IF i mod 3 = 0 THEN T := T + i ;

i:=i+1;

END;

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

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

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 31

Câu 11:

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

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

Câu 12:

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 28

Câu 13:

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 28

Câu 14:

Cho biến thực x đã được gán giá trị 12.41235. Sau khi thực hiện câu lệnh Writeln(‘x=’ ,x:5:2); thì giá trị của biến x được in ra màn hình là:

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

Câu 15:

Biểu thức toán học dưới đây được biểu diễn trong NNLT Pascal là:

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