Câu hỏi:

13/07/2024 17,411

Viết chương trình tính tổng các giá trị chẵn trong phạm vi từ 1 đến N

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

Sale Tết giảm 50% 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).

20 đề Toán 20 đề Văn Các môn khác

Quảng cáo

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 2 = 0 then Tong:= Tong+i;

 Writeln(‘Tong la:’,Tong);

 Readln

End.

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

Câu 1:

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

Xem đáp án » 07/07/2020 62,762

Câu 2:

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

Xem đáp án » 07/07/2020 58,491

Câu 3:

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

Xem đáp án » 07/07/2020 22,369

Câu 4:

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 » 13/07/2024 20,046

Câu 5:

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

Xem đáp án » 07/07/2020 18,375

Câu 6:

Xét khai báo biến sau:

Var x, y, z : real;

c : char;

    i, j : integer;

Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?

Xem đáp án » 07/07/2020 11,591

Bình luận


Bình luận