Bài tập 2: Tính tổng các số chẵn từ 2 đến n. (n được nhập từ bàn phím). program tongchan; uses crt; var n,i,tong: integer; begin clrscr; write('nhap n:'); readln(n); tong:=0; for i:=2 to n do if (i mod 2)=0 then tong:=tong+i; writeln('tong chan la:',tong); readln; end.
Bài tập 3: Viết Chương trình Tính tổng bậc 3 của N số nguyên dương đầu tiên. Program Tong_bac_ba; Var i,n:integer; s:Longint; Begin Write('Nhap N= '); Readln(n); s:=0; For i:=1 To n Do s:=s+(i*i*i); Writeln('Tong bac 3 cua ',n,' so nguyen dau tien = ',s); Readln; End. If i mod 2= 1 Then tong:=tong+sqr(i); Writeln; Writeln('+Tong binh phuong cac so le cua ',n,' so nguyen= ',tong); Readln; End. Bài tập 7: Viết chương trình in ra các số chẵn nhỏ hơn hoặc bằng n ( Với n được nhập).
Clrscr; Write('Nhap so n ='); readln(n); For i:=1 to n do if i mod 2 =0 then Write(i:3,','); readln end.
Bài tập 8: Viết chương trình in ra tổng các số lẻ nhỏ hơn hoặc bằng n ( Với n được nhập).
Program In_So_Le; Uses crt; var S,i,n: integer; Begin Clrscr; Write('Nhap so n ='); readln(n); For i:=1 to n do if i mod 2 =1 then S:= S+i; Writeln('Tong cac so le nho hon ',n,' la: ',S); readln end.
Bài tập 9: Viết chương trình in ra tất cả các ước của một số n (Với n được nhập từ bàn phím) Program Tim_uoc; uses crt; Var n, i: integer; Begin clrscr; Write('Nhap so n ='); readln(n); For i:=1 to n do if n mod i = 0 then write(i:3,','); readln end.
Bài tập 10: In bảng cửu chương n (Với n nhập từ bàn phím) Program Cuu_Chuong; uses crt; var n, i : integer; begin clrscr; write('Nhap n: '); readln(n); for i:= 1 to 9 do writeln(n,' x ', i, ' = ', n*i); readln end.
Bài tập 1: Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng n ( Với n được nhập).
Program In_So_Le; uses crt; var i,n:integer; begin clrscr; write('Nhap so n: ');readln(n); i:=1; while i<=n do begin write(i:3,', '); i:=i+2; end; readln end.
Bài tập 2: Viết chương trình tính n! với n! được định nghĩa như sau:
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
- thao2000
- Câu trả lời hay nhất!
- 05/01/2022
- Cảm ơn 1
- Báo vi phạm
XEM GIẢI BÀI TẬP SGK TIN 8 - TẠI ĐÂY
program bt;uses crt; var i,n,s:integer; begin clrscr; writeln(' Nhập n : ' );Readln(n); S:=0; For i:=1 to n do if (i mod 2) = 0 then s:=s+sqr(i);Writeln('Tổng S: ',S);readln;
end.
Viết chương trình tính tổng bình phương của n số lẻ đầu tiên
Các câu hỏi tương tự
Viết chương trình in ra màn hình 10 số tự nhiên đầu tiên.
Viết chương trình tính tổng các số từ 1 đến 100. Viết chương trình tính tổng các số từ 1 đến N.
Viết chương trình tổng các số chẵn từ 1 đến N.
Viết chương trình tính N giai thừa.
Viết chương kiểm tra xem N có phải số nguyên tố hay không.
Viết chương trình ra màn hình các số nguyên tố nhỏ hơn N.
Viết chương trình vẽ ra hình chữ nhật có chiều ngang là W, chiều dọc là H, với W và H là 2 số nguyên nhập từ bàn phím.
Viết chương trình nhập không giới hạn số, kết thúc khi nhập vào số 0.
Viết chương trình tìm số hạng thứ N của dãy Fibonacci: 1 ; 1 ; 2 ; 3 ; 5 ; 8 ; 11 ; . . . {\displaystyle 1;1;2;3;5;8;11;...}
Viết chương trình in ra màn hình bảng cửu chương N.
Viết chương trình in ra N hàng của tam giác Pascal.
Viết chương trình in ra tất cả các ký tự có mã ASCII từ M đến N.
Cho 4 chữ số 1, 2, 3 và 4. Có bao nhiêu số có 3 chữ số tạo thành từ 4 chữ số 1, 2, 3, 4 và đó là những số nào, viết chương trình thực hiện yêu cầu trên.
Gửi tiết kiệm ngân hàng số tiền X đồng với lãi suất N %/tháng. Để nhận được số tiền ít nhất là B đồng thì phải gửi tối thiểu bao nhiêu tháng. Viết chương trình giải quyết bài toán trên trong trường hợp không tính lãi kép.
Loading Preview
Sorry, preview is currently unavailable. You can download the paper by clicking the button above.
Lorem ipsum dolor sit amet, consectetur adipiscing elit.Morbi adipiscing gravdio, sit amet suscipit risus ultrices eu.Fusce viverra neque at purus laoreet consequa.Vivamus vulputate posuere nisl quis consequat.
Create an account
Tất cảToánVật lýHóa họcSinh họcNgữ vănTiếng anhLịch sửĐịa lýTin họcCông nghệGiáo dục công dânTiếng anh thí điểmĐạo đứcTự nhiên và xã hộiKhoa họcLịch sử và Địa lýTiếng việtKhoa học tự nhiênÂm nhạcMỹ thuật1. Viết chương trình tính tổng các số lẻ từ 1 đến N (N là số nhập từ bàn phím).
Bạn đang xem: Viết chương trình tính tổng các số chẵn từ 1 đến n
2. Viết chương trình tính tổng các số chẵn từ 1 đến N (N là số nhập từ bàn phím).
1...
program bai1;
var s,i,n:longint;
begin
write("N= ");
readln(n);
s:=0;
for i:=1 to n do
if i mod 20 then s:=s+i;
write("s= ",s);
readln
end.
program bai2;
var s,i,n:longint;
begin
write("N= ");
readln(n);
s:=0;
for i:=1 to n do
if i mod 2=0 then s:=s+i;
write("s= ",s);
readln
end.
1.
program tong_le;
uses crt;
var s,n,i:integer;
begin
clrscr;
s:=0;
write("nhap n:");readln(n);
for i:=1 to n do
if i mod 20 then s:=s+i;
writeln("tong s la:",s);
readln
end.
Xem thêm: Cách Bình Luận Bằng Hình Ảnh Trên Facebook Bằng Hình Ảnh Và Ảnh Động
2.
bn khai báo như ở trên
begin
clrscr;
s:=0;
write("nhap n:");readln(n);
for i:=1 to n do
if i mod 2=0 then s:=s+i;
writeln("tong s la:",s);
readln
end.
XONG RÙI ĐÓ!!
1.
program tongle;
uses crt;
var i,s,n:integer;
begin
clrscr;
s:=0;
write("nhap n:");readln(n);
for i:=1 to n do
if i mod 20 then s:=s+i;
writeln("tong s la:",s);
readln
end.
2.
program tongchan;
uses crt;
var i,s,n:integer;
begin
clrscr;
s:=0;
write("nhap n:");readln(n);
for i:=1 to n do
if i mod 2=0 then s:=s+i;
writeln("tong s la:",s);
readln
end.
Xem thêm: Gửi Th Anh Có Thích Nước Mỹ Không Điện Ảnh, Gửi Thanh Xuân: Anh Có Thích Nước Mỹ Không
XONG RÙI!!!
Viết chương trình nhập vào 1dãy n số (n được nhập từ bàn phím) tìm giá trị lớn nhất trong dãy vừa lập
viết công thức pascal nhập số n từ bàn phím . xuất ra màn hình các số chia hết cho 2 và 5 từ 1 đến n
viết công thức pascal nhập số n từ bàn phím, thực hiện xuất ra màn hình:+các số nguyên tố từ 2 đến n
+các số chính phương từ 0 đến n
+các số hoàn hảo từ 1 đến n
Làm giúp mình với!!!
AI GIÚP MIK BÀI NÀY VS
1) viết chương trình tính tổng 100 số tự nhiên đầu tiên
2. viết chương trình kiểm tra số n nhập từ bàn phím có chia hết cho hai số 2 và 3 không. nếu có thì in ra dòng chữ chia hết và không chia hết
viết chương trình pascal :
- So sánh 2 số nhập từ bàn phím
-Tìm số nhỏ nhất trong 4 số nhập từ bàn phím
-hoán đổi giá trị của 2 biến x, y theo thứ tự không giảm
-in ra kết quả sắp xếp 3 số nhập từ bàn phím theo thứ tự không tăng
Viết chương trình nhập số nguyên A từ bàn phím,kiểm tra thông báo ra màn hình xem số đó là số âm hay dương
Bài toán: Lan, Hà, Mai lần lượt có sô tuổi khác nhau, biết số tuổi của các bạn được nhập từ bàn phím. hãy viết chương trình in ra màn hình tổng số tuổi của ba bạn. giải hộ mình bài này với!!!
Viết chương trình in ra số lớn nhất trong bốn số nhập từ bàn phím với điều kiện chỉ được dùng 2 biến