Hãy tính tổng các số lẻ trong Scratch
Bài 2: Tính tổng của các số chẵn của dãy số 1, 2, 3, 4, 5, 6, 7, 8…, 2022( giải chi tiết trong scratch nhé. |
1+2+3+...+2022=[(2022-1):1+1]x(2022+1):2=2022x2023:2=2045253
Em hãy viết chương trình tính tổng các số lẻ từ 1 đến N trong đó N là số được nhập từ bàn phím (N<=100)
uses crt;
var i,n,t:integer;
begin
clrscr;
write('nhap n='); readln(n);
t:=0;
for i:=1 to n do
if i mod 2=1 then t:=t+i;
writeln(t);
readln;
end.
Cho thuật toán, giải bằng 2 cách liệt kê và vẽ sơ đồ khối
Bài 1: Cho dãy A gồm N số nguyên A1…AN. Hãy tính tổng các số các số chẵn và tổng các số lẻ có trong dãy.
Bài 2: Cho dãy A gồm N số nguyên A1…AN. Hãy đếm tất cả các số chẵn trong dãy.
Bài 3: Cho dãy A gồm N số nguyên A1…AN. Hãy cho biết có bao nhiêu số trong dãy có giá trị bằng 0.
Bài 4: Cho dãy A gồm N số nguyên A1…AN. Hãy đếm tất cả các số chẵn không âm trong dãy.
Bài 1:
#include <bits/stdc++.h>
using namespace std;
long long n,x,i,t1,t2;
int main()
{
cin>>n;
t1=0; t2=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x%2==0) t1=t1+x;
else t2=t2+x;
}
cout<<t1<<" "<<t2;
return 0;
}
Viết chương trình tính tổng các số lẻ trong mảng a gồm 10 phần tử. - Tìm ra số lẻ trong [ 1..10 ] - Tính tổng các phần tử trong mảng đó
uses crt;
var a:array[1..100]of integer;
i,t,t1:integer;
begin
clrscr;
for i:=1 to 10 do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to 10 do
if a[i] mod 2<>0 then
begin
write(a[i]:4);
t:=t+a[i];
end;
writeln;
writeln('Tong cac so le la: ',t);
t1:=0;
for i:=1 to 10 do
t1:=t1+a[i];
writeln('Tong cac phan tu cua mang la: ',t1);
readln;
end.
Viết chương trình tính tổng các số lẻ trong mang a gồm 10 phần tử
- tim ra số lẻ trong [1...10]
-tính tổng các phần tử trong mảng đó
uses crt;
var a:array[1..100]of integer;
i,n,t,t1:integer;
begin
clrscr;
n:=10;
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
begin
t:=t+a[i];
write(a[i]:4);
end;
writeln;
writeln('Tong cac so le la: ',t);
t1:=0;
for i:=1 to n do
t1:=t1+a[i];
writeln('Tong cac phan tu cua mang la: ',t1);
readln;
end.
Nhập vào 1 dãy số bất kỳ, hãy tính tổng các số lẻ và là số âm trong dãy số đó?
mọi người giúp mình câu hỏi với! mình cảm ơn ạ
Nhập vào mảng A gồm n số nguyên (n<=1000), đếm và tính tổng các số chẵn,số lẻ trong dãy.Ví dụ, với n=5, các số trong dãy là 7 8 4 2 10Thì số lượng các số chẵn là 4, tổng các số chẵn là 24Số lượng các số lẻ là 1, tổng các số lẻ là 7
uses crt;
var a:array[1..1000]of integer;
i,n,t,t1,dem,dem1:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
t1:=0;
dem:=0;
dem1:=0;
for i:=1 to n do
begin
if a[i] mod 2=0 then
begin
t:=t+a[i];
inc(dem);
end
else begin
t1:=t1+a[i];
inc(dem1);
end;
end;
writeln('So luong so chan la: ',dem);
writeln('Tong cac so chan la: ',t);
writeln('So luong so le la: ',dem1);
writeln('Tong cac so le la: ',t1);
readln;
end.
Hãy tính tổng các số tự nhiên lẻ từ 1 đến 199999
Cho A là tổng các số lẻ có 2 chữ số không ? tính giá trị của A hãy cho biết A là số chẵn hay số lẻ?
Cho A là tổng các số lẻ có 2 chữ số ko ? tính giá trị của A hãy cho biết A là số chẵn hay số lẻ ?