Ngọcc Thúyy
Hỏi từ APP VIETJACK
Viết chương trình in ra màn hình giá trị tổng các số tự nhiên lẻ bé hoặc bằng n.Với số tự nhiên n được nhập vào từ bàn phím.
Quảng cáo
1 câu trả lời 292
Program BTH;
Uses crt;
var j,i,n:word;
Begin
Clrscr;
Write('Nhap n ='); readln(n);
j:= 0;
For i:=1 to n do if i mod 2 =1 then
Begin
Write(i,' ');
j:=j + 1;
if j mod 15 = 0 then Writeln;
end;
readln
end.
Uses crt;
var j,i,n:word;
Begin
Clrscr;
Write('Nhap n ='); readln(n);
j:= 0;
For i:=1 to n do if i mod 2 =1 then
Begin
Write(i,' ');
j:=j + 1;
if j mod 15 = 0 then Writeln;
end;
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 VIETJACK45502
-
Hỏi từ APP VIETJACK28395
Gửi báo cáo thành công!
