Câu hỏi:
08/07/2020 8,538Viết chương trình tính tổng các giá trị lẻ 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 = 1 then Tong:= Tong+i;
Writeln(‘Tong la:’,Tong);
Readln
End.
CÂU HỎI HOT CÙNG CHỦ ĐỀ
Câu 2:
Biểu diễn nào dưới đây không phải là biểu diễn hằng trong Pascal:
Câu 3:
Cho đoạn chương trình sau:
T := 0 ;
FOR i := 1 to 10 DO
IF i mod 2 = 0 THEN T := T + 1 ;
Sau khi thực hiện, T có giá trị?
Câu 4:
Xét biểu thức sau (3*x <=15) and (x <=4). Biểu thức cho kết quả FALSE khi:
Câu 6:
Để viết chương trình giải phương trình bậc nhất có dạng: ax + b = 0 (a#0), em cần phải thực hiện lệnh nhập vào từ bàn phím các biến nào sau đây:
về câu hỏi!