Những câu hỏi liên quan
Nguyễn Cao Kỳ Uyên
Xem chi tiết
Phía sau một cô gái
8 tháng 3 2023 lúc 22:49

Câu a:

n = int(input("Nhập số nguyên n: "))

S = 0

for i in range(1, n+1):

     S += i

print("Tổng S =", S)

Câu b:

n = int(input("Nhập số nguyên n: "))

S = 0

for i in range(1, n, 2):

     S += i

print("Tổng S =", S)

Câu c: 

def calc_sum(n):

     s=0

     for i in range(1,n+1):

          s += 2*i

     return s

n = int(input("Nhập vào số n: "))

print("Tổng S=2+4+6+...2n là:",calc_sum(n))

 

NGUYỄN CHÍ tiến
9 tháng 3 2023 lúc 21:16

n = int(input("Nhập số nguyên n: "))

S = 0

for i in range(1, n+1):

     S += i

print("Tổng S =", S)

Câu b:

n = int(input("Nhập số nguyên n: "))

S = 0

for i in range(1, n, 2):

     S += i

print("Tổng S =", S)

Câu c: 

def calc_sum(n):

     s=0

     for i in range(1,n+1):

          s += 2*i

     return s

n = int(input("Nhập vào số n: "))

print("Tổng S=2+4+6+...2n là:",calc_sum(n))

Bảo Châu
Xem chi tiết
Bùi Anh Tuấn
4 tháng 5 2021 lúc 20:07

bài 1

Bùi Anh Tuấn
4 tháng 5 2021 lúc 20:12

Bùi Anh Tuấn
4 tháng 5 2021 lúc 20:23

BÀI 3

uses crt;
var a: array[1..100] of integer;
i,n,max,s,j: integer;
begin
clrscr;
writeln(' nhap so phan tu cua day'); readln(n);
for i:=1 to n do
begin
writeln('a[',i,']'); readln(a[i]);
end;
max:=a[1];
s:=0;
for i:=1 to n do
begin
if max<a[i] then max:=a[i];
s:=s+a[i];
end;
writeln('so lon nhat trong day tren la:',max);
writeln('tong bang:',s);
writeln('so nguyen to trong mang la:');
j:=1;
for i:=1 to n do
if a[i]>1 then
begin
repeat
inc(j);
until (a[i] mod j=0);
if j>(a[i] div 2) then writeln(a[i]);
j:=1;
end;
readln
end.

 

Minh Lê
Xem chi tiết
Nguyễn Lê Phước Thịnh
15 tháng 2 2022 lúc 16:26

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.

nana
Xem chi tiết
PC Vũ
Xem chi tiết
Minh Lệ
11 tháng 5 2021 lúc 1:42

Program HOC24;

var i: integer;

s: real;

begin

s:=0;

for i:=1 to 100 do s:=s+1/i;

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

readln

end.

kiều trinh
Xem chi tiết
Nguyễn Lê Phước Thịnh
28 tháng 2 2023 lúc 22:55

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,i,t=0;

cin>>n;

for (int i=1; i<=3*n+1; i++)

if (i%2==1) t+=i;

else t-=i;

cout<<t;

}

thư lê
Xem chi tiết
Phía sau một cô gái
16 tháng 3 2023 lúc 15:04

program TinhTongWhileDo;

var

     n, i: integer;

     S: real;

begin

     write('Nhap so n: ');

     readln(n);

     S := 0;

     i := 1;

     while i <= 2*n do

     begin

          S := S + 1/i;

          i := i + 1;

     end;

     writeln('Tong S=1/1+1/2+1/3+1/4+...+1/2n la: ', S:0:2);

     readln;

end.

NGUYỄN LÊ XUÂN THỊNH
Xem chi tiết
Nguyễn Lê Phước Thịnh
20 tháng 2 2023 lúc 0:38

Câu 6:

uses crt;

var n,i:integer;

begin

clrscr;

readln(n);

for i:=1 to n do 

if n mod i=0 then write(i:4);

readln;

end.

5:

uses crt;

var n,i,dem:integer;

begin

clrscr;

readln(n);

dem:=0;

for i:=0 to n do

if i mod 2=1 then 

begin

write(i:4);

dem:=dem+1;

end;

writeln;

writeln(dem);

readln;

end.

Dương Thu Ha
Xem chi tiết
Dương Thu Ha
6 tháng 3 2023 lúc 15:13

Giúp mk với mai mk kiểm tra r

Minh Lệ
6 tháng 3 2023 lúc 23:44

Program HOC24;

var n: integer;

s: real;

begin

n:=1; s:=0;

while s<=3.15 do

begin

s:=s+n;

n:=n+2;

end;

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

readln

end.