Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Vũ Minh Quân
Xem chi tiết
Phía sau một cô gái
16 tháng 4 2023 lúc 20:34

program Tong_Binh_Phuong_So_Chan;

uses crt;

var n, i, sum: integer;

begin

     clrscr;

     write('Nhap vao so nguyen n (6 < n < 30): ');

     readln(n);

     sum := 0;

     for i := 2 to n do

          if i mod 2 = 0 then

               sum := sum + i * i;

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

     readln;

end.

Elizabeth
Xem chi tiết
Lâm Khả Doanh
Xem chi tiết
Nguyễn Lê Phước Thịnh
28 tháng 2 2023 lúc 22:28

1:

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do

t:=t+i*i;

write(t);

readln;

end.

Lê Chiêu Nguyên	Vũ
4 tháng 4 2023 lúc 10:21

2

program bt2;

var i,n,t:integer;

begin

readln(n);

s:=0;

for i:=1 to n do

if i mod 2 = 1 then s:=s+i;

readln;

end.

Hồng Trần
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 4 2021 lúc 18:34

uses crt;

var i,n,t:integer;

begin

clrscr;

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

t:=0;

for i:=1 to 2*n do 

 if i mod 2=1 then t:=t+sqr(i);

writeln(t);

readln;

end.

Trung
Xem chi tiết
Phía sau một cô gái
20 tháng 4 2023 lúc 21:25

program TinhTongBinhPhuong;

var

     n, i, S: Integer;

begin

     Write('Nhap n: ');

     Readln(n);

     S := 0;

     for i := 1 to n do

     begin

          S := S + i * i;

     end;

     WriteLn('Tong cac binh phuong la: ', S);

end.

mistud
Xem chi tiết
Nguyễn Lê Phước Thịnh
10 tháng 12 2021 lúc 23:17

2:

#include <bits/stdc++.h>

using namespace std;

long long n,i;

int main()

{

cin>>n;

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

if (n%i==0) cout<<i<<" ";

return 0;

}

Lê Tiến Thành
Xem chi tiết
Duy Nam
7 tháng 3 2022 lúc 8:14

uses crt;

var m,n,t,i:integer;

begin

clrscr;

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

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

t:=0;

for i:=m to n do 

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

writeln('Tong cac so chan tu ',m,' den ',n,' la: ',t);

readln;

end.

Nguyễn Lê Phước Thịnh
8 tháng 3 2022 lúc 6:59

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

if (n%2==0)

{

t=0;

for (i=1; i<=n; i++) if (i%2==0) t+=i;

}

else 

{

t=0;

for (i=1; i<=n; i++) if (i%2!=0) t+=i;

}

cout<<t;

return 0;

}

Lê Tiến Thành
Xem chi tiết
Vũ Quang Huy
12 tháng 3 2022 lúc 9:26

tk

uses crt;

var m,n,t,i:integer;

begin

clrscr;

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

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

t:=0;

for i:=m to n do 

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

writeln('Tong cac so chan tu ',m,' den ',n,' la: ',t);

readln;

end.

Nguyễn Lê Phước Thịnh
14 tháng 3 2022 lúc 15:55

uses crt;

var n,i,t,dem:integer;

begin

clrscr;

readln(n);

if n mod 2=0 then 

begin

t:=0;

for i:=1 to n do 

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

writeln(t);

end

else 

begin

t:=0;

dem:=0;

for i:=1 to n do 

 if i mod 2=1 then 

begin

t:=t+i;

dem:=dem+1;

end;

writeln(t/dem:4:2);

end;

readln;

end.

TRẦN TẤN DŨNG
Xem chi tiết
Nguyễn Lê Phước Thịnh
18 tháng 3 2021 lúc 22:41

Sửa đề: Tính tổng bình phương các số nhỏ hơn hoặc bằng n

uses crt;

var n,i,s:longint;

begin

clrscr;

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

s:=0;

for i:=1 to n do 

  s:=s+sqr(i);

writeln(s);

readln;

end.