Quảng cáo
1 câu trả lời 263
VAR n, i, s: INTEGER;
BEGIN
write('N='); readln(n);
s:=0;
FOR i:=2 TO n DO
IF i MOD 2 = 0 THEN s:=s+i;
write('T');
readln
END.
BEGIN
write('N='); readln(n);
s:=0;
FOR i:=2 TO n DO
IF i MOD 2 = 0 THEN s:=s+i;
write('T');
readln
END.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK45513
-
Hỏi từ APP VIETJACK28408
Gửi báo cáo thành công!
