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
Minh Nguyệt Điêu
Xem chi tiết
Phan Thị Ka
Xem chi tiết
Minh Lệ
19 tháng 3 2023 lúc 22:40

Câu 1:

Program HOC24;

var i,p: integer;

t: longint;

begin

write('Nhap P: '); readln(p);

t:=0;

for i:=1 to p do if i mod 2<>0 then t:=t+i;

write('Tong cac so le la: ',t);

readln

end.

Minh Lệ
19 tháng 3 2023 lúc 22:41

Câu 2:

Program HOC24;

var i,n: integer;

t: longint;

begin

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

t:=0;

for i:=1 to n do if i mod 2=0 then t:=t+i;

write('Tong cac so chan la: ',t);

readln

end.

Minh Lệ
19 tháng 3 2023 lúc 22:42

Câu 3:

Program HOC24;

var i,t,n: integer;

begin

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

t:=0;

for i:=1 to n do if n mod i=0 then t:=t+i;

write('Tong cac uoc cua ',n,' la: ',t);

readln

end.

Nhật Tiên
Xem chi tiết
Bùi Anh Tuấn
1 tháng 4 2021 lúc 19:42

Nguyễn Nhi
Xem chi tiết
Nguyễn Lê Phước Thịnh
25 tháng 1 2022 lúc 17:35

#include <bits/stdc++.h>

using namespace std;

long long t1,t2,i;

int main()

{

t1=0;

t2=0;

for (i=15; i<=1000; i++)

{

t1+=i;

t2-=i;

}

cout<<t1<<" "<<t2;

return 0;

}

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;

}

kamai
Xem chi tiết
Bắc^-^etoo
21 tháng 3 2023 lúc 14:41

Program Tinhtong;
Uses Crt;
var i,S: integer;
begin
Clrscr;
S:=0;
For i :=1 to 7 do S:=S+i;
Writeln('Tong cac so tu 1 den 7 la ',S);
End.

h9iii
Xem chi tiết
Milly BLINK ARMY 97
16 tháng 9 2021 lúc 18:58
Program baitap;
Uses crt;
Var S,i : integer;
BEGIN
clrscr;
S:= 0;
For i:=1 to 50 do
S:= S+i;
Writeln (' Vay tong cua cac so tu 1 den 50 la ', S);
Readln
END.
Pham Huynh Bao Thy
Xem chi tiết
Oni-chan
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 3 2022 lúc 20:14

a: 125 mod 5<>0

b: 

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

for i:=1 to 50 do t:=t+i;

write(t);

readln;

end.

c: for <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;

d: 

Dạng thiếu: if <điều kiện> do <câu lệnh>;

Dạng đủ: if <điều kiện> do <câu lệnh 1> else <câu lệnh 2>;