hãy viết chương trình tìm số n nhỏ nhất sao cho tổng s=2+4+6+...+n và s>2018. hãy in ra s và n?
giúp mk vs cần gấp lắm luôn!!
Những câu hỏi liên quan
Dựa vào đoạn chương trình sau, em hãy sử dụng cấu trúc 1 chương trình và các khai báo cần thiết để viết chương trình hoàn chỉnh đưa ra được giá trị biến S và số vòng lặp sau khi chạy chương trình S:=0; n:=0; while S<=50 do begin n:= n+1; S:= s+n end;
uses crt;
var s,n:integer;
begin
clrscr;
s:=0;
n:=0;
while s<=50 do
begin
n:=n+1;
s:=s+n;
end;
writeln(n);
writeln(s);
readln;
end.
Đúng 0
Bình luận (0)
Cho chương trình Tính Tổng Các Số Tự Nhiên Từ S1+2+3+ ...... (Khi Tổng S đầu tiên 1000 thì dừng). Hỏi cộng bao nhiêu số?Hãy Tìm lỗi trong chương trình và sửa lỗi viết lại chương trình cho đúng:Program tinh_tong;Var n S: IntegerBeginn: 0;S 0;While S 1000 don: n + 1; S: S + n Writeln(‘Can cong’,n-1,’so va tong dau tien 1000 la’, S); Readln;End.
Đọc tiếp
Cho chương trình Tính Tổng Các Số Tự Nhiên Từ S=1+2+3+ ...... (Khi Tổng S đầu tiên > 1000 thì dừng). Hỏi cộng bao nhiêu số?
Hãy Tìm lỗi trong chương trình và sửa lỗi viết lại chương trình cho đúng:
Program tinh_tong;
Var n S: Integer
Begin
n: 0;
S = 0;
While S< 1000 do
n:= n + 1;
S:= S + n
Writeln(‘Can cong’,n-1,’so va tong dau tien > 1000 la’, S);
Readln;
End.
viết chương trình với thuật toán sau:
Bước 1. S←0,n←0
Bước 2. Nếu S ≤ 1000 thi chuyển tới bước 3; ngược lại ( S>1000) chuyển tới bước 4 Bước 3. n←n+1; S←S+n; và quay lại bước 2
Bước 4. In kết quả: S và n là số tự nhiên nhỏ nhất sao cho S > 1000. Kết thúc thuật toán.
uses crt;
var n,s:integer;
begin
clrscr;
s:=0;
n:=0;
while s<=1000 do
begin
n:=n+1;
s:=s+n;
end;
writeln(s);
writeln(n);
readln;
end.
Đúng 1
Bình luận (0)
viết chương trình sử dụng while do để tìm in ra n(n là số tự nhiên) s=1,2,3....n n là số lớn nhất và nhỏ hơn 50
tham khảo
Program HOC24;
var n: byte;
begin
n:=0;
while n<50-1 do n:=n+1;
write('N=',N);
readln
end.
Đúng 0
Bình luận (0)
Xem thêm câu trả lời
Tìm giá trị lớn nhất và giá trị nhỏ nhất của p/s sau: A= n-3/n+2 với n là số nguyên Giúp mik vs mn ơi, mik đag cần gấp lắm!!!
\(A=\dfrac{n-3}{n+2}=1-\dfrac{5}{n+2}\)
TH1 : n >=-1 => n+2>=1 >0
\(\Rightarrow A\ge1-\dfrac{5}{1}=-4\)
Dấu = khi n=-1
TH2: n<= -3 => n+2<=-1 <0
\(\Rightarrow A\le1-\dfrac{5}{-1}=6\)
Dấu = xảy ra khi n=-3
Đúng 0
Bình luận (2)
\(A=\dfrac{n-3}{n+2}=1-\dfrac{5}{n+2}\left(n\ne-2\right)\)
Vì n là số nguyên khác -2
TH1 : \(n\ge-1\Leftrightarrow n+2\ge1>0\Leftrightarrow\dfrac{5}{n+2}\le\dfrac{5}{1}=5\)
\(\Leftrightarrow1-\dfrac{5}{n+2}\ge1-5\Leftrightarrow A\ge-4\)
\(n+2>0\Leftrightarrow\dfrac{5}{n+2}>0\Leftrightarrow A< 1\)
Vậy với \(n\ge-1\)thì \(-4\le A< 1\left(1\right)\)
TH2: \(n\le-3\Leftrightarrow n+2\le-1< 0\Leftrightarrow-\left(n+2\right)\ge1>0\)
\(\Leftrightarrow\dfrac{5}{-\left(n+2\right)}\le\dfrac{5}{1}=5\Leftrightarrow\dfrac{5}{n+2}\ge-5\Leftrightarrow A\le1-\left(-5\right)=6\)
\(n+2< 0\Leftrightarrow\dfrac{5}{n+2}< 0\Leftrightarrow A>1\)
Vậy với \(n\le-3\)thì \(1< A\le6\left(2\right)\)
Từ (1),(2) suy ra \(-4\le A\le6\)
A=-4 khi n=-1
A=6 khi n=3
## Mình đã cố chi tiết hết sức, mong bạn hiểu được 
Đúng 0
Bình luận (0)
1.Cho tập hợp B= {1;2;3}
a) Cách biết nào đúng, cách viết nào sai
B c N
B c N
b) Hãy viết tập hợp con của B
2. Cho tập hợp C= {5;6;7;8}
Hãy viết các tập hợp của C sao cho phần từ của nó phải có ít nhất 1 số lẻ và 1 số chẵn
Giúp mk với nha. Mk cần gấp lắm. Please 🙏
Tính tổng S biết S(n) = 1^2 + 2^2 +3^2 +4^2+… + k^2 sao cho tất cả các giá trị từ 1^2 đến k^2 phải nhỏ hơn hoặc bằng n
1. viết chương trình cho người dùng nhập n . In ra tổng của S
2.trình bày ra giấy tính độ phức tạp của chương trình vừa thực hiện
Mn làm giúp mình với ạ . Càng sớm càng tốt :((
1:
#include <bits/stdc++.h>
using namespace std;
long long n,i,s;
int main()
{
cin>>n;
s=0;
for (i=1; i<=n; i++)
s=s+i*i;
cout<<s;
return 0;
}
Đúng 0
Bình luận (0)
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)
cho số tự nhiên N(1 N<10^6). Tính tổng sau : S= 1-2+3-4+5-6...+N
viết chương trình ra giúp vs
uses crt;
var i,n:integer;
s:longint;
begin
clrscr;
write('nhap n:');readln(n);
s:=0;
for i:=1 to n do
if i mod 2=1 then s:=s+i
else s:=s-i;
writeln('s= ',s);
readln;
end.
Đúng 1
Bình luận (0)