viết chương trình tính và đưa ra mh tổng s=1²+3²+5²..+99² mọi ng giúp mình với
Những câu hỏi liên quan
Viết chương trình tính và đưa ra tổng sau: S = 1 + 1/3 + 1/5 +1/7 +….+1/N+…cho đến khi S > 3,15.
Program HOC24;
var n: integer;
s: real;
begin
n:=1; s:=0;
while s<=3.15 do
begin
s:=s+n;
n:=n+2;
end;
write('S= ',s:5:2);
readln
end.
Đúng 1
Bình luận (1)
NGÔN NGỮ C GIÚP MÌNH VỚI Ạ. 3.Viết chương trình tính tổng nghịch đảo của n số nguyên đầu tiên, theo công thức sau: S 1 + 1/2 + 1/3 + …+ 1/n 5.Viết chương trình nhập số nguyên dương n từ bàn phím, n10, tính và đưa ra màn hình giá trị n! 6.Viết chương trình tính và in tổng dưới đây ra màn hình: S 1 + 1/(2!) + 1/(3!) + .. + 1/(n!) với n được nhập từ bàn phím, 0n10. 8.Viết chương trình in ra các số nguyên tố từ 2 đến n, với n nhập từ bàn phím. 10.Nhập tử số và mẫu số của một phân số, in phân số đó...
Đọc tiếp
NGÔN NGỮ C GIÚP MÌNH VỚI Ạ. 3.Viết chương trình tính tổng nghịch đảo của n số nguyên đầu tiên, theo công thức sau: S = 1 + 1/2 + 1/3 + …+ 1/n 5.Viết chương trình nhập số nguyên dương n từ bàn phím, n<=10, tính và đưa ra màn hình giá trị n! 6.Viết chương trình tính và in tổng dưới đây ra màn hình: S = 1 + 1/(2!) + 1/(3!) + .. + 1/(n!) với n được nhập từ bàn phím, 0<n<10. 8.Viết chương trình in ra các số nguyên tố từ 2 đến n, với n nhập từ bàn phím. 10.Nhập tử số và mẫu số của một phân số, in phân số đó dưới dạng tối giản.
Em hãy viết chương trình nhập vào mảng A gồm 100 phần tử. tính và đưa ra màn hình tổng các phần tử không chia chết cho 2 trong mảng. Mn ơi giúp mình làm bài này với ạ TT mình cảm ơn mọi người nhiều!! (pascal nhé mấy bạn ơi
Var a:array[1..100] of integer;
i,s:integer;
Begin
For i:=1 to 100 do
Begin
Write('Nhap phan tu thu ',i,' = ');readln(a[i]);
If a[i] mod 2 <> 0 then s:=s+a[i];
End;
Write('Tong la ',s);
Readln;
End.
Đúng 1
Bình luận (1)
Viết chương trình tính và đưa ra màn hình tổng S và số lượng các số nguyên chẵn trong phạm vi từ a đến b? Với a, b được nhập từ bàn phím (a <= b) .
giúp em với hic
#include <bits/stdc++.h>
using namespace std;
long long a,b,i,dem,s;
int main()
{
cin>>a>>b;
dem=0;
s=0;
for (i=a; i<=b; i++)
if (i%2==0)
{
dem++;
s=s+i;
}
cout<<dem<<" "<<s;
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình nhập vào dãy gồm N số nguyên a1,a2,...,aN và số nguyên K bất kỳ . Tính và đưa ra màn hình tổng các số chia hết cho K trong dãy Giúp mình với mai mình nộp bài r 🤦
uses crt;
var a:array[1..100]of integer;
i,n,k,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap k='); readln(k);
t:=0;
for i:=1 to n do
if a[i] mod k=0 then t:=t+a[i];
writeln(t);
readln;
end.
Đúng 1
Bình luận (0)
Mọi người giúp mình câu này với ạ :
Tính tổng : S= 1-2-3+4+5-6-7+8+9-10-11+12+...+n
Viết chương trình pascal nhập vào một số n tính tổng từ 1 đến n theo 2 cách
Đề 1 Câu 1 (3.0 điểm): Viết chương trình nhập vào số nguyên dương N và thực hiện tính tổng S=3+5+7+..+(2n+1). Câu 2 (7.0 điểm): a. Viết chương trình nhập vào một dãy số nguyên có n phần tử. b. Đưa ra màn hình các phần tử có giá trị âm ở trong dãy. c. Tìm phần tử lớn nhất có trong dãy
Câu 1:
var i,n:integer;
s:longint;
begin
Write('n = ');readln(n)
for i:=1 to n do
s:=s+2*i+1;
write('tong la: ',s);
readln
end.
Đúng 1
Bình luận (0)
Câu 2
Bài 5:
Var b:array:[1..1000] of integer;
i,n,max:integer;
Begin
Write('n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(b[i]);
End;
Write('Cac phan tu am la: ');
For i:=1 to n dko
if b[i]<0 then write(b[i]:8);
writeln;
max:=b[1];
For i:=2 to n do
If b[i] > max then max:=b[i];
write('So lon nhat la ',max);
Readln
End.
Đúng 1
Bình luận (0)
Mọi người giúp e bài này với ạ. Mai e phải thi rồi II. Tự luận Bài 1: Viết chương trình có sử dụng hàm đưa ra màn hình số lượng các số nguyên tố từ 20 đến 50Bài 2: Viết chương trình có sử dụng hàm tính giai thừa của 1 số nguyên để đưa ra màn hình tổng 2 giai thừaBài 3: Viết chương trình có sử dụng hàm lũy thừa xy để đưa ra màn hình hiệu 2 lũy thừaBài 4: Viết chương trình có sử dụng hàm đưa ra màn hình các số chính phương từ 1 đến 100 ngăn cách nhau bởi dấu cách, biết số chính phương là số được t...
Đọc tiếp
Mọi người giúp e bài này với ạ. Mai e phải thi rồi
II. Tự luận
Bài 1: Viết chương trình có sử dụng hàm đưa ra màn hình số lượng các số nguyên tố từ 20 đến 50
Bài 2: Viết chương trình có sử dụng hàm tính giai thừa của 1 số nguyên để đưa ra màn hình tổng 2 giai thừa
Bài 3: Viết chương trình có sử dụng hàm lũy thừa xy để đưa ra màn hình hiệu 2 lũy thừa
Bài 4: Viết chương trình có sử dụng hàm đưa ra màn hình các số chính phương từ 1 đến 100 ngăn cách nhau bởi dấu cách, biết số chính phương là số được tạo ra từ bình phương của 1 số nguyên khác
9 tháng 5 2021 lúc 17:03
Đề: Viết chương trình nhập từ bàn phím số nguyên dương n và dãy số từ \(a_1\) , \(a_2\) , ... , \(a_n\) . In ra màn hình tổng các số lẻ có trong dãy số.
P/S: Mọi người giúp mình với, mình đang cần gắp lắm ạ!
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
if a[i] mod 2<>0 then t:=t+a[i];
writeln(t);
readln;
end.
Đúng 1
Bình luận (1)