Quảng cáo
2 câu trả lời 313
2 năm trước
program SumOddNumbers;
var
i, sum: integer;
begin
i := 1;
sum := 0;
while i <= 10 do
begin
if i mod 2 <> 0 then
sum := sum + i;
i := i + 1;
end;
writeln('Tong cac so le tu 1 den 10 la: ', sum);
readln;
end.
2 năm trước
program SumOddNumbers;
var
i, sum: integer;
begin
i := 1;
sum := 0;
while i <= 10 do
begin
if i mod 2 <> 0 then
sum := sum + i;
i := i + 1;
end;
writeln('Tong cac so le tu 1 den 10 la: ', sum);
readln;
end.
Quảng cáo
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK44718
-
Hỏi từ APP VIETJACK26336
Gửi báo cáo thành công!