Viết chương trình tính tổng các số trẵn trong dãy k =1+2+3+4+5+6+7+8+9+10
Những câu hỏi liên quan
Viết chương trình tính hiệu các số 5=1-2-3-4-5-6-7-8-9-10
Viết chương trình nhập vào dãy gồm N số tìm các đoạn con có tổng bằng Kvà in tất cả ra màn hìnhInputOutput15 152 3 10 7 8 6 5 2 8 9 17 -2 0 5 102 3 107 85 2 817 -20 5 1010 151 2 3 4 5 6 7 8 9 151 2 3 4 57 815 làm bằng pascal nha mọi người giúp mình
Đọc tiếp
Viết chương trình nhập vào dãy gồm N số tìm các đoạn con có tổng bằng K
và in tất cả ra màn hình
| Input | Output |
15 15 2 3 10 7 8 6 5 2 8 9 17 -2 0 5 10 | 2 3 10 7 8 5 2 8 17 -2 0 5 10 |
10 15 1 2 3 4 5 6 7 8 9 15 | 1 2 3 4 5 7 8 15 |
làm bằng pascal nha mọi người giúp mình
program TimDoanConCoTongK; const MAX_N = 100; var a: array[1..MAX_N] of Integer; N, K: Integer; i, j, sum: Integer; begin // Nhập vào dãy số và K Write('Nhap vao so phan tu cua day: '); ReadLn(N); WriteLn('Nhap vao cac phan tu cua day:'); for i := 1 to N do begin Write('a[', i, '] = '); ReadLn(a[i]); end; Write('Nhap vao gia tri K: '); ReadLn(K); // Tìm các đoạn con có tổng bằng K WriteLn('Cac doan con co tong bang ', K, ':'); for i := 1 to N do begin sum := 0; for j := i to N do begin sum := sum + a[j]; if sum = K then begin for k := i to j do begin Write(a[k], ' '); end; WriteLn; end; end; end; end.
Chương trình trên cho phép người dùng nhập vào dãy số và giá trị K. Sau đó, chương trình sẽ tìm tất cả các đoạn con trong dãy có tổng bằng K và in chúng ra màn hình.
Ví dụ, với dãy số [1, 2, 3, 4, 5] và K = 7, chương trình sẽ in ra:
2 3 4 5 2Đây là tất cả các đoạn con có tổng bằng 7 trong dãy số đã cho.
Đúng 0
Bình luận (0)
cho tổng s= 1-2-3+4+5-6-7+8+9 -10-11 +12... n. viết chương trình nhập vào một số n tính tổng từ 1 đến n pascal
Viết chương trình tính tổng : S1 = 1+3+5+7+...+N S2 = 2+4+6+8+...+N S3 = 1-2+3-4+...+N Viết chương trình tính tích : P1 = 1×3×5×7×...× N P2 = 2×4×6×8×...×N
Câu 2:
#include <bits/stdc++.h>
using namespace std;
double p1,p2;
int i,n;
int main()
{
cin>>n;
p1=1;
p2=1;
for (i=1; i<=n; i++)
{
if (i%2==0) p2=p2*(i*1.0);
else p1=p1*(i*1.0);
}
cout<<fixed<<setprecision(2)<<p1<<endl;
cout<<fixed<<setprecision(2)<<p2;
return 0;
}
Đúng 1
Bình luận (0)
Viết chương trình nhập vào 1 mảng gồm 10 phần tử hãy:
1. Hiển thị dãy vừa nhập trên 1 hang.
2. Tính tổng các phần tử trong mảng.
3. Tính trung bình cộng các phần tử trong mảng.
4. Tính tổng các số âm và số dương trong mảng.
5. Tính tổng các số chẵn và số lẻ trong mảng.
6. Đếm các số âm, số dương, số chẵn, số lẻ trong mảng.
program bt;
uses crt;
var i, s, sa, sd, sc, sl, da, dd, dc, dl : integer;
a : array[1..50] of integer;
begin
clrscr;
for i:=1 to 10 do begin
write('Nhap phan tu thu ',i,': '); readln(a[i]);
end;
write('Day so vua nhap la: ');
for i:=1 to 10 do write(a[i],', ');
writeln;
s := 0; sa := 0; sd := 0; sc := 0; sl := 0; da := 0; dd := 0; dc := 0; dl := 0;
for i:=1 to 10 do begin
s := s + a[i];
if (a[i] > 0) then begin sd := sd + a[i]; dd := dd + 1 end;
if (a[i] < 0) then begin sa := sa + a[i]; da := da + 1 end;
if (a[i] mod 2 = 0) then begin sc := sc + a[i]; dc := dc + 1; end
else begin sl := sl + a[i]; dl := dl + 1 end;
end;
writeln('Tong cac phan tu trong mang la ',s);
writeln('Trung binh cong cac phan tu trong mang la ',s/10);
writeln('Tong cac so am la ',sa);
writeln('Tong cac so duong la ',sd);
writeln('Tong cac so chan la ',sc);
writeln('Tong cac so le la ',sl);
writeln('So cac so am la ', da);
writeln('So cac so duong la ', dd);
writeln('So cac so chan la ', dc);
writeln('So cac so le la ', dl);
readln
end.
Đúng 0
Bình luận (0)
Bài 3:
a) Viết tiếp hai số hạng vào các dãy số sau
- 2; 5; 10; 17; …….
- 0; 3; 8; 15; ……...
b) Tìm số hạng thứ 250 của dãy số sau
4; 7; 12; 19;
Bài 4: Tính tổng của các dãy số sau
a) 3 + 6 + 9 + 12 + ……… + 636 + 639
b) 2 + 4 + 6 + 8 + ……….. + 662 + 664
Bài 3:
a:
2;5;10;17;26;37
0;3;8;15;24;35
Đúng 3
Bình luận (1)
viết chương trình: in dãy số 10 9 8 7 6 5 ( dùng while..do)
uses crt;
var i:integer;
begin
clrscr;
i:=10;
while i>=5 do
begin
write(i:4);
i:=i-1;
end;
readln;
end.
Đúng 0
Bình luận (0)
1. Viết chương trình tính tích N1*2*3*...*n (với n được nhập từ bàn phím) 2. Viết chương trình tính tổng A1/1*3+1/2*4+1/3*5+...+1/n*(n+2) 3. Viết chương trình tính tổng số lẻ có trong dãy từ 0-n (n được nhập từ bàn phím) 4. Viết chương trình in ra màn hình các số chẵn có trong dãy từ 0-n (n được nhập từ bàn phím) và đếm có bao nhiêu số. 5. Viết chương trình in ra màn hình các số lẻ có trong dãy số từ 0-n (n được nhập từ bàn phím) và đếm có bao nhiêu số. 6. Viết chương trình nhập số nguyên n. Tìm...
Đọc tiếp
1. Viết chương trình tính tích N=1*2*3*...*n (với n được nhập từ bàn phím)
2. Viết chương trình tính tổng A=1/1*3+1/2*4+1/3*5+...+1/n*(n+2)
3. Viết chương trình tính tổng số lẻ có trong dãy từ 0->n (n được nhập từ bàn phím)
4. Viết chương trình in ra màn hình các số chẵn có trong dãy từ 0->n (n được nhập từ bàn phím) và đếm có bao nhiêu số.
5. Viết chương trình in ra màn hình các số lẻ có trong dãy số từ 0->n (n được nhập từ bàn phím) và đếm có bao nhiêu số.
6. Viết chương trình nhập số nguyên n. Tìm và đưa ra màn hình các ước của n.
7. Viết chương trình in ra màn hình các bội của n ( n được nhập từ bàn phím)
8. Viết chương trình tính tổng S=1/1+1/2+1/3+...+1/n (n được nhập từ bàn phím)
Câu 6:
uses crt;
var n,i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
if n mod i=0 then write(i:4);
readln;
end.
5:
uses crt;
var n,i,dem:integer;
begin
clrscr;
readln(n);
dem:=0;
for i:=0 to n do
if i mod 2=1 then
begin
write(i:4);
dem:=dem+1;
end;
writeln;
writeln(dem);
readln;
end.
Đúng 2
Bình luận (0)
: Trong các dãy số sau đây. Dãy các số tự nhiên là:
A. 1 ; 3 ; 5 ; 7 ; 9 ; 11 ; 13 … B. 0 ; 1 ; 2 ; 3 ; 4 ; 5 ; 6 ; 7 ; 8 ; 9 ; …
C. 0 ; 2 ; 4 ; 6 ; 8 ; 10 ; … D. 0 ; 1 ; 2 ; 3 ; 4 ; 5 ; 6 ; 7 ; 8 ; 9.giúp tui với
Xem chi tiết
Là B bạn nha
Vì dãy số tự nhiên không giới hạn nha bạn
Xem thêm câu trả lời