Câu hỏi:
07/07/2020 13,697Viế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)
Siêu phẩm 30 đề thi thử THPT quốc gia 2024 do thầy cô VietJack biên soạn, chỉ từ 100k trên Shopee Mall.
Quảng cáo
Trả lời:
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.
Quảng cáo
CÂU HỎI HOT CÙNG CHỦ ĐỀ
Câu 3:
Trong Pascal, cú pháp câu lệnh rẽ nhánh if-then dạng thiếu là:
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:
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?
về câu hỏi!