Quảng cáo
1 câu trả lời 160
Var i : integer;
S : real;
Begin
For i:=20 to 50 do
S:=0;
If i mod 2 = 0 then S := S+ i;
Write (S);
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 VIETJACK
Đã trả lời bởi chuyên gia
45024 -
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
34480 -
Đã trả lời bởi chuyên gia
30258 -
Hỏi từ APP VIETJACK27227
-
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
21902
Gửi báo cáo thành công!
