Lời giải:
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.
Gói VIP thi online tại VietJack (chỉ 200k/1 năm học), luyện tập gần 1 triệu câu hỏi có đáp án chi tiết
Nếu những bài toán mà câu hỏi chỉ liên quan tới một bảng, ta có thể:
Top of Form