Kinh Nghiệm Hướng dẫn Bài tập câu lệnh FOR trong Pascal 2022
Quý khách đang tìm kiếm từ khóa Bài tập câu lệnh FOR trong Pascal được Update vào lúc : 2022-06-21 21:15:05 . Với phương châm chia sẻ Mẹo về trong nội dung bài viết một cách Chi Tiết 2022. Nếu sau khi tìm hiểu thêm nội dung bài viết vẫn ko hiểu thì hoàn toàn có thể lại Comments ở cuối bài để Tác giả lý giải và hướng dẫn lại nha.Hảy xem tập tin đính kèm
Ôn tập vòng lặp For
Bài tập 1: Viết chương trình tính tổng S của những số có trong số nguyên dương N. S = 1+2+...+N
ví dụ : tính tổng của 5 ( 1+2+3+4+5 = 15)
Cách 1: Dùng vòng lặp FOR.(xác lập được số lần lặp)
Program TinhTong;
Uses crt;
Var N,i,S:integer;
Begin
Clrscr;
Write('Nhap vao gia tri cua N :'); Readln(N);
S:=0;
For i:=1 to N do S:=S+i;
Writeln('Ket qua la :',S);
Readln;
End.
Cách 2: Dùng vòng lặp REPEAT. (trường hợp xác lập được số lần lặp)
Program TinhTong;
Uses crt;
Var N,i,S:integer;
Begin
Clrscr;
Write('Nhap vao gia tri cua N :'); Readln(N);
S:=0; i:=1;
Repeat
S:=S+i;
i:=i+1;
Until i>N;
Writeln('Ket qua la :',S);
Readln;
End.
Cách 3: Dùng vòng lặp WHILE. (là trường hợp xác lập được số lần lặp)
Program TinhTong;
Uses crt;
Var N,i,S:integer;
Begin
Clrscr;
Write('Nhap vao gia tri cua N :'); Readln(N);
S:=0; i:=1;
While i<=N Do {trong lúc I nhỏ hơn hoặc bằng N thì thực thi)
Begin
S:=S+i;
i:=i+1;
End;
Writeln('Ket qua la :',S);
Readln;
End.
HS hảy xem tiếp ở tập tin đính kèm
Bài tập 3a: Viết chương trình nhập vào những số nguyên cho tới lúc nào muốn kết thúc thì nhập số 0. Hãy đếm xem có bao nhiêu số chẵn, bao nhiêu số lẽ vừa mới được nhập vào.
Ý tưởng:
Bài toán này sẽ không còn biết đúng chuẩn số lần lặp nên ta không thể dùng vòng lặp FOR. Ta phải nhập vào số nguyên N trước, tiếp theo đó mới kiểm tra xem N=0? Do đó ta nên dùng vòng lặp REPEAT hoặc While.
vòng lặp REPEAT
Program Nhapso;
Uses crt;
Var N,demchan, demle : Integer;
Begin
Clrscr; demchan:= 0; demle :=0;
Repeat
Write('Nhap vao mot so nguyen N= '); Readln(N);
If N MOD 2 = 0 Then demchan:=demchan+1
Else demle := demle +1;
Until N=0;
Writeln(‘Cac so chan la:’, demchan ,’ Cac so le duoc nhap vao la: ‘,demle);
Readln;
End.
Reply
7
0
Chia sẻ
Share Link Tải Bài tập câu lệnh FOR trong Pascal miễn phí
Bạn vừa đọc Post Với Một số hướng dẫn một cách rõ ràng hơn về Clip Bài tập câu lệnh FOR trong Pascal tiên tiến và phát triển nhất và Chia SẻLink Download Bài tập câu lệnh FOR trong Pascal Free.