Viết chương trình in ra màn hình các số lẻ từ 1 đến n được nhập từ bàn phím
2 câu trả lời
program oken;
uses crt;
var n,i:longint;
begin
clrscr;
write('nhap n: '): readln(n);
for i:=1 to n do
if i mod 2=1 then
write(i,' ');
readln;
end.
Program So_le;
uses crt;
Var i: integer;
Begin
clrscr;
Write (' Cac so le tu 1 den n la:' );
Writeln;
For i:=1 to n do
if i mod 2<> 0 then write (i:5);
readln;
End.
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
