Câu 1: tính tổng s:=1+2+3..+nCâu 2: Tính tổng s:=1+1/2+1/3+…+1/n

Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

Chọn lớp

Chọn môn

Mua vip

Long Châu

18 tháng 4 2022

Câu 1: tính tổng s:=1+2+3..+n

Câu 2: Tính tổng s:=1+1/2+1/3+…+1/n

#Tin học lớp 8

Thế Thôi

19 tháng 4 2022

Đúng(1)

Các câu hỏi dưới đây có thể giống với câu hỏi trên

Min:))

25 tháng 3 2021

câu 1: Cho 1 số nguyên n- Hãy tính tổng các số từ 1 đến N- Hãy tính tổng các số chẵn từ 2 đến Ncâu 2: Cho 2 số nguyên a và b:- Tìm Bôi chung nhỏ nhất của a và bcâu 3: Cho 2 số nguyên p và q (p<q). Hãy in ra màn hình các số nguyên tố trong khoảng p và q. Hãy cho biết có bao nhiêu số nguyên tố?GIÚP MÌNH VỚI MÍ BẠN...

Đọc tiếp

#Tin học lớp 8

Nguyễn Lê Phước Thịnh

25 tháng 3 2021

Câu 1:

uses crt;

var n,i,t1,t2:integer;

begin

clrscr;

write('Nhap n='); readln(n);

t1:=0;

t2:=0;

for i:=1 to n do

begin

t1:=t1+i;

if i mod 2=0 then t2:=t2+i;

end;

writeln('Tong cac so tu 1 den ',n,' la: ',t1);

writeln('Tong cac so chan tu 1 den ',n,' la: ',t2);

readln;

end.

Đúng(0)

Nguyễn Lê Phước Thịnh

25 tháng 3 2021

Câu 2:

uses crt;

var a,b,i,bcnn:longint;

begin

clrscr;

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

bcnn:=a*b;

for i:=a*b-1 downto 1 do

if (i mod a=0) and (i mod b=0) then

begin

if bcnn>i then bcnn:=i;

end;

writeln(bcnn);

readln;

end.

Đúng(0)

Nguyễn Võ Phương Uyên

24 tháng 3 2022

Câu 1:Viết chương trình in ra các số nguyên tử 1→9 dùng vòng lặp While...doCâu 2:Viết chương trình in ra màn hình 100 lần tên emCâu 3:Viết chương trình tính tổng N số tự nhiên đầu tiênCâu 4:Viết chương trình tính tính T=1+1/2+...+1/nCâu 5:Vòng lặp sau cho biết kết quả S=? S:=0;For i:=1 to 5 do S :=S+2Câu 6:Dòng lệnh sau thực hiện bao nhiêu vòng lặp For i:=5 to 10...

Đọc tiếp

#Tin học lớp 8

ngtraidat

12 tháng 3 2023

NHẬP N TÍNH TỔNG S= 1/2+1/3+1/4+....+1/N BẰNG CÂU LỆNH WHILE..DO

#Tin học lớp 8

Minh Lệ

12 tháng 3 2023

Program HOC24;

var i,n: integer;

s: real;

begin

write('Nhap N: '); readln(n);

i:=2; s:=0;

while i<=n do

begin

s:=s+1/i;

i:=i+1;

end;

write('S = ',s:5:2);

readln

end.

Đúng(1)

thái jr

16 tháng 1 2022

Câu 2: (2,0 điểm) TÍNH TỔNG

Cho tổng S = 1^2 + 3^2 + 5^2 + ... + (2n – 1)^2 với 𝑛 ∈ 𝑁.

Yêu cầu: Tính tổng S.

Dữ liệu vào: Nhập từ bàn phím số tự nhiên N (0 <n<=10000)

Kết quả: In kết quả tính được của tổng S ra màn hình.

#Tin học lớp 8

Nguyễn Lê Phước Thịnh

16 tháng 1 2022

#include <bits/stdc++.h>

using namespace std;

long long s,i,n;

int main()

{

cin>>n;

s=0;

for (i=1; i<=n; i++)

if (i%2==1) s=s+i*i;

cout<<s;

return 0;

}

Đúng(2)

thái jr

16 tháng 1 2022

bn vt thành free pascal đc ko

Đúng(0)

daukhacgiabao

15 tháng 3 2023

Câu 3: Viết chương trình tính tổng S= 1+1/2^2+1/3^3+...+1/n^2 với n N*cho trước (Sử dụng vòng lặp while..do)Các bạn giúp mình được không...

Đọc tiếp

#Tin học lớp 8

Ngọc Ẩn

8 tháng 5 2021

Câu 1: Tính tổng trong dãy n phần tử

S:=S+a[i];

Câu 2: Sắp xếp mảng n phần tử tăng dần

1 3 8 4 2 6 (n=6)

-> 1 2 3 4 6 8

#Tin học lớp 8

Nguyễn Lê Phước Thịnh

8 tháng 5 2021

Câu 1:

uses crt;

var a:array[1..100]of integer;

i,n,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

s:=0;

for i:=1 to n do

s:=s+a[i];

writeln(s);

readln;

end.

Đúng(0)

Nguyễn Lê Phước Thịnh

8 tháng 5 2021

Câu 2:

uses crt;

var a:array[1..100]of integer;

i,n,j,tam:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to n-1 do

for j:=i+1 to n do

if a[i]>a[j] then

begin

tam:=a[i];

a[i]:=a[j];

a[j]:=tam;

end;

for i:=1 to n do

write(a[i]:4);

readln;

end.

Đúng(0)

Minh Lê

15 tháng 2 2022

viết chương trình tính tổng

s= 1*2/3*4+2*3/4*5+3*4/5*6+...+n*(n+1)/(n+2)*(n+3)

#Tin học lớp 8

Nguyễn Lê Phước Thịnh

15 tháng 2 2022

uses crt;

var s:real;

i,n:integer;

begin

clrscr;

readln(n);

s:=0;

for i:=1 to n do

s:=s+(n*(n+1))/((n+2)*(n+3));

writeln(s:4:2);

readln;

end.

Đúng(2)

Binh Hong

6 tháng 4 2023

Tính tổng S=1+2+3+....+n

#Tin học lớp 8

Phía sau một cô gái

6 tháng 4 2023

program TongN;

var

n, i, sum: integer;

begin

writeln('Nhap vao so n: ');

readln(n);

sum := 0;

for i := 1 to n do

begin

sum := sum + i;

end;

writeln('Tong S = ', sum);

readln;

end.

Đúng(2)

Linh lung

16 tháng 1 2022

Cho số tự nhiên n Hãy lập trình tính tổng sau s =1+1/2+1/3+...+1/n

#Tin học lớp 8

𝓫𝓪̣𝓷 𝓷𝓱𝓸̉ ('・ω・')

16 tháng 1 2022

Tham khảo:

Uses Crt ;
Var i , n : Integer ;
tong: Real ;
BEGIN
Clrscr ;
Write (‘ Cho so tu nhien n : ‘) ; Readln (n) ;
tong :=0 ;
i :=1 ;
While i <= n Do
Begin
tong := tong + 1/i ;
i := i + 1 ;
End ;
Writeln (‘ Tong can tim la : ‘, tong:12:6 ) ;
Readln ;
END .

Đúng(0)

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP