1. Viết chương trình tính tổng các số tự nhiên chắn từ 1 ---> N, biết N là số tự nhiên bất kỳ được nhập từ bàn phím 2. Giống câu trên, nhưng thay từ "chẵn" thành "lẻ"

xuxi

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 27 xem

1 trả lời

Thích Trả lời

mytran1184

Program Tinh_tong_so_le;
Uses CRT;
Var i,n,S:integer;
sl:boolean;
Begin
Clrscr;
Write('Nhap so n:');Readln(n);
sl:=True;
For i:=1 to n do
Begin
If sl=True then S:=S+i;
sl:= not True;
End;
Writeln('Tong cua n so le la:', S);
Readln;
End.

@xin ctlhn

Program Tinh_tong_so_chan;
Uses CRT;
Var i,n,S:integer;
sl:boolean;
Begin
Clrscr;
Write('Nhap so n:');Readln(n);
sl:=True;
For i:=1 to n do
Begin
If sl=True then S:=S+i;
sl:= not True;
End;
Writeln('Le cua n so le la:', S);
Readln;
End.

Vote (0) Phản hồi (0) 2 năm trước

hieu.vu362001

1. Program sochan;

Uses crt,

Var i,S,n: Longint;

Begin

Readln(n);

S:=0;

For i:=1 to n do if n mod 2=0 then S:=S+i;

Writeln('S=',S);

Readln;

End.

2. Program sole;

Uses crt;

Var i,S,n: Longint;

Begin

Readln(n);

S:=0;

For i:=1 to n do if n mod 2=1 then S:=S+i;

Writeln('S=', S);

Readln;

End.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Vẽ anime nha Yêu cầu: +Full line:3 NL: Umm.. hôm nay đã tiu "xương xương"200đ chs Nhachoa:> Thấy mía bẹn lâu lâu cứ để avt đôi:3, ai để hok:)))

mồm bò không phải là mồm bò mà là mồm bò là gì?

1. Minh plays volleyball very __________ . (skill) 2. Last year Mr. Nam drove more ____________ than he does this year. (dangerous) 3. There are many badminton ____________ nowadays. (compete) 4. I’d like a nice ________ orange. (juice) 5. It’s very ___________ of you to give me a lift. (help) 6. There was a wide ___________ of vegetables on display (select) 7.Look at the ______________ ! what are the about. (advertise) 8. People say that “ ____________ is better than cure” (prevent) 9. The nurse needs to know Hoa’s __________ . (high) 10. Mr. Pike didn’t go to work yesterday because of his _________ . (sick)

Tính bằng tay bài này cho em với ạ T:=3; V:=4; For i:=1 to 5 do begin T: = T+2; V:= V+T; end; T=? V=?

Những đặc điểm của vị trí địa lý về mặt tự nhiên có ảnh hưởng như thế nào đến môi thường tự nhiên Việt Nam?

Giải giúp câu 4 với ạ hứa cho 5 sao+ cảm ơn

Xem bài tập này của em giải có đúng không ạ

Đặt 4 câu hỏi có dùng phép nhân hoá, gạch dưới từ ngữ nhân hoá. *Gợi ý: tìm câu có dùng phép so sánh trong bài Chân, Tai, Tay, Mắt, Miệng và Cây Tre Việt Nam.

Tìm x biết -8⋮x và 12⋮x x⋮4,x⋮(-6),và -20<x<-10 x⋮(-9),x⋮12,và 20<x<50

vẽ chibi or anime cực kì tuk đẹp vào nhá mn tâm trạng mik đang kos chịu nên sẽ có thể hơi gắt 1 xíu Ngoài lề : a Kiệt vào đây cho e vào ngay và luôn

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến