Em hãy viết chương trình để người sử dụng nhập các số khác 0 giới tính và in ra màn hình tổng các nghịch đảo của các số này chương trình kết thúc khi người sử dụng nhập số 0 đầu tiên
Anh Em làm nhanh Cho mình nha
Hãy viết chương trình nhập các số khác 0 rồi tính tổng của các số đó. Chương trình kết thúc khi số được nhập đầu tiên là 0
uses crt;
var x,t,i:integer;
begin
clrscr;
t:=0;
repeat
readln(x);
t:=t+x;
until x=0;
write(t);
readln;
end.
Viết công thức để người dùng nhập các số khác 0 rồi tính và in ra màn hình nghịch đảo số này công thức kết thúc khi người dùng nhấp số 0 lần đầu, nghịch đảo số n là 1 trên n
Em hãy Viết chương trình để người sử dụng nhập các số khác 0 Rôi tính và in ra màn hình tổng các nghịch đảo của các số này chương trình kết thúc khi người sử dụng nhập số 0 đầu tiên
uses crt;
var s,i,a:longint;
begin
clrscr;
s:=0;i:=2;
write('nhap so thu 1:');readln(a);
while a<>0 do
begin
s:=s+1/a;
writeln('nhap so thu',i);readln(a);
i:=i+1;
end;
writeln('tong nghich dao la:',s:2:3);
readln;
end.
program bai1;
var a:array[1..100] of longint;
s,i,n:longint;
begin
repeat
write('N= ');readln(n);
until n>0;
for i:=1 to n do
begin
write('A[',i,']= ');readln(a[i]);
if a[1] =0 then exit;
end;
s:=0;
for i:=1 to n do
begin
if a[i]>0 then s:=s+1/a[i];
end;
writeln('Tong la ',s);
readln
end.
Anh em giúp mình bài này cái nhé
Em hãy viết chương trình để người sử dụng nhập các số khác 0 rồi tính và in ra màn hình tổng các nghịch đảo của các số này chương trình
kết thúc khi người sử dụng nhập số 0 đầu tiên
Ô nhiễm nước là hiện tượng các sông , hồ, nước ngầm bị ô nhiễm . Ô nhiễm nguồn nước có thể do hai nguyên nhân đó là: ô nhiễm tự nhiên và ô nhiễm nhân tạo. Ô nhiễm tự nhiên thường do thiên tai, động đất hoặc núi lửa. Ô nhiễm nhân tạo là do con người đã tác động đến như các rác thải từ con người đổ vào, các nhà máy xí nghiệp. Nếu đến một lúc nào đó thì nước sạch sẽ không có đủ nước cung cấp cho con người, động vật và thực vật sẽ phải thiếu nước do đó chúng sẽ kiệt sức và chết. Còn các động vật dưới nước sẽ chết do không có nước sạch để sống. Dẫn đến những điều xấu cho con người , động vật và thực vật.
Do đó chúng ta cần phải giữ vệ sinh nơi ở và môi trường, các nhà máy không nên xả nước bẩn xuống hồ, sông và phải tiết kiệm nước đúng cách.
dễ
uses crt;
var s,i,a:longint;
begin
clrscr;
s:=0;i:=2;
write('nhap so thu 1:');readln(a);
while a<>0 do
begin
s:=s+1/a;
writeln('nhap so thu',i);readln(a);
i:=i+1;
end;
writeln('tong nghich dao la:',s:2:3);
readln;
end.
Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số nguyên B. Độ dài của dãy n cũng được nhập từ bàn phím với (0<n<=100)? Tính tổng và đếm các số dương có trong dãy số? In kết quả ra màn hình
Program HOC24;
var n,d,i: integer;
B: array[1..100] of integer;
t: longint;
begin
write('Nhap N: '); readln(n);
for i:=1 to n do
begin
write('B[',i,']='); readln(b[i]);
end;
d:=0; t:=0;
for i:=1 to n do
if b[i]>0 then
begin
d:=d+1;
t:=t+b[i];
end;
writeln('Tong cac so duong trong day so la: ',t);
write('Co ',d,' so duong trong day');
readln
end.
uses crt;
var b:array[1..100] of longint;
n,i,d,s:longint;
begin
clrscr;
write('n='); readln(n);
for i:=1 to n do
begin
write('a[',i,']: '); readln(b[i]);
if b[i]>0 then begin
inc(d);
inc(s,b[i]);
end;
end;
writeln('Tong cac so duong: ',s);
writeln('Co ',d,' so duong');
readln;
end.
Dùng câu lệnh while...do viết chương trình nhập các số nguyên kết thúc khi nhập bằng 0. Tính tổng các số chẵn, tổng các só lẻ đã nhập, rồi in kết quả ra màn hình?
Dùng câu lệnh while...do viết chương trình nhập các số nguyên kết thúc khi nhập bằng 0 . Tính tổng các số chẵn , tổng câc số lẻ đã nhập rồi in kết quả ra màn hình
uses crt;
var n,i,t1,t2:integer;
begin
clrscr;
t1:=0;
t2:=0;
repeat
readln(n);
if n mod 2=0 then t1:=t1+n
else t2:=t2+n;
until n=0;
writeln(t1,' ',t2);
readln;
end.
Viết chương trình nhập vào từ bàn phím các số nguyên dương, khi người dùng nhập số có nhiều chữ số, thì chương trình sẽ tính tổng của các chữ số đó và in ra màn hình. (dùng Python để viết chương trình).
Ví dụ: khi người dùng nhập số 246 thì tổng bằng 2 + 4 + 6 = 12
nhập vào từ bàn phím một dãy số nguyên(sử dụng chương trình con), tính tổng các phần tử đó, in ra màn hình( sử dụng chương trình con), sắp xếp dãy số nguyên thành dãy không giảm(sử dụng chương trình con)
#include <bits/stdc++.h>
using namespace std;
long long a[1000],i,n,t;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
t=0;
for (i=1; i<=n; i++) t+=a[i];
cout<<t<<endl;
sort(a+1,a+n+1);
for (i=1; i<=n; i++) cout<<a[i]<<" ";
return 0;
}