Những câu hỏi liên quan
nuinuini
Xem chi tiết
Hạ Nhật
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 23:31

#include <bits/stdc++.h>

using namespace std;

long long m,n,i,t;

int main()

{

cin>>m>>n;

t=0;

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

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

cout<<t;

return 0;

}

Bình luận (0)
Phương Linh Pham Thị
Xem chi tiết
Thanh Phong (9A5)
24 tháng 3 2023 lúc 12:06

int main() 

{

int n;

long s;

s=0;

i=1;

printf("\nSo n la: ");

scanf("%d",&n);

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

    {

    s=s+i;

    }

printf("\nTổng %d là %ld: ", n, s);

}

Bình luận (1)
Như Ý
Xem chi tiết
Phía sau một cô gái
1 tháng 5 2023 lúc 19:27

Câu 1:

program Tinhtong:

var

     n, i, sum: integer;

begin

     write('Nhap n: ');

     readln(n);

     sum := 0;

     for i := 2 to n do

     begin

          if i mod 2 = 0 then

          begin

               sum := sum + i;

          end;

     end;

     writeln('Tong cac so chan tu 2 toi ', n, ' la ', sum);

     readln; 

end.

Câu 2:

program Tinhtong:

var

     n, i, sum: integer;

begin

     write('Nhap n: ');

     readln(n);

     sum := 0;

     for i := 1 to n do

     begin

          if i mod 2 = 1 then

          begin

               sum := sum + i;

          end;

     end;

     writeln('Tong cac so le tu 1 toi ', n, ' la ', sum);

     readln;

end.

Bình luận (1)
Anh Duy
Xem chi tiết
Nguyễn Lê Phước Thịnh
18 tháng 1 2022 lúc 10:12

#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;

}

Bình luận (0)
Kiều Vũ Linh
19 tháng 1 2022 lúc 8:53

Var s,i,n:longint;

Begin

Write('Nhap so luong so n = ');readln(n);

For i:=1 to n do

s:=s+i*i;

Write('Tong la ',s);

Readln;

End.

Bình luận (0)
foxbi
Xem chi tiết
Thanh Phong (9A5)
18 tháng 3 2023 lúc 8:11

Uses crt;

var n,i,s: integer;

begin clrscr;

readln(n);

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

writeln(s);

readln;

end.

Bình luận (0)
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.

Bình luận (0)
Thị Thảo Ly Hoàng
Xem chi tiết
Minh Lệ
13 tháng 3 2023 lúc 12:21

Program HOC24;

var i,n: integer;

s: longint;

begin

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

s:=0;

for i:=1 to n do s:=s+sqr(i);

write('S= ' ,s);

readln

end.

Bình luận (0)
Thanh Phong (9A5)
13 tháng 3 2023 lúc 12:27

Uses crt;

var i,n,y: integer;

begin clrscr;

readln(n);

for i:=1 to n do s:=i*i;

Writeln(s);

readln;

end.

Bình luận (1)
Nguyenthanh
Xem chi tiết
Nguyễn Lê Phước Thịnh
9 tháng 5 2021 lúc 20:44

Câu 1: 

uses crt;

var n,i:integer;

s:real;

begin

clrscr;

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

s:=1;

for i:=1 to n do

s:=s*i;

writeln(s);

readln;

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
9 tháng 5 2021 lúc 20:44

Câu 2: 

uses crt;

var t,i,n:integer;

begin

clrscr;

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

t:=0;

for i:=1 to n do

t:=t+i;

writeln(t);

readln;

end.

Bình luận (0)
Truy Kích 3.0
29 tháng 5 2021 lúc 9:51

Bài 2 dùng công thức n*(n+1)/2

Bình luận (0)