Viết chương trình nhập vào 1 số nguyên n in ra màn hình thông báo có bào nhiêu số chắn từ 1 đến n, in ra các số chắn đó trên 1 hàng.
2 câu trả lời
var
i,n,d:integer;
begin
write('nhap vao n');readln(n);
d:=0;
write('cac so chan la');
for i:=1 to n do
if i mod 2 = 0 then
begin
writeln(i);
d:=d+1;
end;
writeln('co ',d,' so chan tu 1 den ',n);
readln
end.
var
i,n,d:integer;
begin
write('nhap vao n');readln(n);
d:=0;
write('cac so chan la');
for i:=1 to n do
if i mod 2 = 0 then
begin
writeln(i);
d:=d+1;
end;
writeln('co ',d,' so chan tu 1 den ',n);
readln
end.
#nếu sai bn thông cảm nha!
- Đề 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
