K
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.

20 tháng 1 2022

program tong;
uses crt;
var M, N, S, i: integer;
begin
clrscr;
write ('Nhap M= '); readln(M);
write ('Nhap N= '); readln(N);
s : = 0;
for i := M to N do if (i mod 2 = 0) then s:= s + i;
write (T'ong cac so chan trong pham vi tu M den N = ',s);
readln;
end.

mk mới làm tổng thui nghen

20 tháng 1 2022

còn hiệu với tích ko ạ

29 tháng 10 2021

#inckude <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=0;

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

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

cout<<t;

return 0;

}

10 tháng 5 2022

thiếu đề?

10 tháng 5 2022

hình như thiếu đề r .-.

28 tháng 11 2021

Tham khảo

 

  
8 tháng 10 2021

Pascal, Python hay C++ bạn?

8 tháng 10 2021

python ạ 

19 tháng 12 2021

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

}

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.

4 tháng 4 2023

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.

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.

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.