Viết Ct tính tổng A=1+2+..+n và in kết quả 20>n>3 .Ai biết giúp mình với .
Những câu hỏi liên quan
Viết Ct tính tổng A=1+2+3+...+n và in kết quả .(n nhập từ phím 20>n>2)
...
var i, n,A : integer;
begin
clrscr;
write('nhap n = '); readln(n);
A:= 0 ;
for i:= 1 to n do
A:= A + 1 ;
readln
end.
Đúng 0
Bình luận (0)
Hai số lẻ liên tiếp có tổng là 20 , hiệu là 2 . Tìm số lẻ tiếp đó .
Ai giúp mình câu này với , mình biết phép tính và kết quả rồi , giờ chỉ cần lời giải hoi . Giúp mình với !!!
Gọi hai số lẻ liên tiếp cần tìm lần lượt là x và x + 2
Theo đề bài, ta có:
\(x+x+2=20\)
\(\left(x+x\right)+2=20\)
\(2\times x=20-2\)
\(2\times x=18\)
\(x=18:2\)
\(=9\)
Vậy hai số lẻ liên tiếp cần tìm đó là 9 và 11
#Kễnh
Đúng 3
Bình luận (0)
Giúp mik nhanh nha
Câu 1: viết câu lệnh tính tổng s-1-1/2-1/3-...-1/n với n là số nguyên nhập từ bàn phím
Câu 2: Viết ct nhập điểm ktra học kì môn tin học cho N học sinh và in ra màn hình.(N và điểm đc nhập từ bàn phím, sử dụng biến mảng)
Câu 3: Viết ct nhập vào mảng các số nguyên A gồm 30 phần tử, các phần tử có gtrị ko quá 32767. Thông báo ra màn hình ptử nhỏ nhất và vị trí trong mảng
Đọc tiếp
Giúp mik nhanh nha Câu 1: viết câu lệnh tính tổng s=-1-1/2-1/3-...-1/n với n là số nguyên nhập từ bàn phím Câu 2: Viết ct nhập điểm ktra học kì môn tin học cho N học sinh và in ra màn hình.(N và điểm đc nhập từ bàn phím, sử dụng biến mảng) Câu 3: Viết ct nhập vào mảng các số nguyên A gồm 30 phần tử, các phần tử có gtrị ko quá 32767. Thông báo ra màn hình ptử nhỏ nhất và vị trí trong mảng
Viết ct nhập giá trị cho một dãy số nguyên có n phần tử a. In dãy vừa nhập b. Tính tổng các số trong dãy in kết quả nhận được ra màn hình
#include <bits/stdc++.h>
using namespace std;
long long a[1000],n,i,t;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++) cout<<a[i]<<" ";
cout<<endl;
t=0;
for (i=1; i<=n; i++) t+=a[i];
cout<<t;
return 0;
}
Đúng 0
Bình luận (0)
Cho tệp SONGUYEN.TXT chứa cac số nguyên dương N.
Viết ct in ra các số chẵn nhỏ hơn hoặc bằng N; Tính tổng các số chẵn đó.
Kết quả ghi vào tệp SOCHAN.TXT
a) XĐ input, output bài toán
b) Viết ct giải quyết bài toán trên
Mô tả
- Tệp SONGUYEN.TXT chứa các số nguyên dương N
- Tệp SOCHAN.TXT dòng ban đầu chứa các số chẵn nhỏ hơn hoặc bằng N
- Dòng 2 chứa tổng số chẵn
AI GIÚP EM VỚI Ạ
Cứuuuuu e
Đọc tiếp
Cho tệp SONGUYEN.TXT chứa cac số nguyên dương N. Viết ct in ra các số chẵn nhỏ hơn hoặc bằng N; Tính tổng các số chẵn đó. Kết quả ghi vào tệp SOCHAN.TXT a) XĐ input, output bài toán b) Viết ct giải quyết bài toán trên Mô tả - Tệp SONGUYEN.TXT chứa các số nguyên dương N - Tệp SOCHAN.TXT dòng ban đầu chứa các số chẵn nhỏ hơn hoặc bằng N - Dòng 2 chứa tổng số chẵn AI GIÚP EM VỚI Ạ Cứuuuuu e
a)
Input: Số nguyên dương N, dãy số a1,a2,a3,...,an
Output: Tổng các số chẵn nhỏ hơn hoặc bằng N
b)
Program HOC24;
var i,n: integer;
t: longint;
a: array[1..1000] of integer;
f1,f2: text;
const fi='SONGUYEN.TXT'
fo='SOCHAN.TXT'
begin
assign(f1,fi);
assign(f2,fo);
reset(f1);
rewrite(f2);
readln(f1,n);
for i:=1 to n do read(f1,a[i]);
for i:=1 to n do if (a[i] mod 2=0) and (a[i]<=n) then
begin
write(f2,a[i],' ');
t:=t+a[i];
end;
writeln(f2);
write(f2,t);
close(f1); close(f2);
end.
Đúng 0
Bình luận (0)
Viết ct nhập vào dãy gồm N số hãy in đếm số dãy con có tổng bằng 0
| Input | Output |
6 -4 3 1 0 -2 5 | 2 |
Giải thích: có 2 dãy con có tổng bằng 0 là: {-4,3,1,0};{-4,1,-2,5}
giúp mình với
Viết chương trình nhập 1 dãy số gồm N số nguyên N≤100 in dãy vừa nhập.Tính và đưa ra màn hình tổng các số chia hết cho 2 nhưng không chia hết cho 3 trong dãy trên.Ghi kết quả vừa tính được vào tệp Bài tập.Out
Giúp mình với ạ
viết ct tính tổng các số chẵn nhỏ hơn N (N được nhập vào)
giúp mình với ạ
uses crt;
var m,n,s,i:integer;
begin
clrscr;
readln(n);
s:=0;
m:=1;
for i:=m to n do
if i mod 2=0 then s:=s+i;
writeln(s);
readln;
end.
Đúng 1
Bình luận (0)
Viết ct nhập số N, nhập dãy số nguyên, in dãy số nguyên, tính tổng và in kết quả
Program kthkII;
uses crt;
var i, n, s, N : integer;
A: array[1..100] of integer;
begin
write('Nhap so nguyen N: '); readln(N);
write('Nhap do dai cua day so: '); readln(n);
for i:=1 to n do
begin write('A[',i,']='); readln(A[i]); end;
for i:=1 to n do write('A[',i,']= ', A[i]);
s:=0;
for i:=1 to n do s:=s+A[i];
writeln('Tong cac so la: ', s);
readln;
End.
Đúng 0
Bình luận (0)