Lập trình Pascal-Bài 5: Câu lệnh lặp for..to..do;while..do, repeat..until

  Рет қаралды 153,879

Tung Phan Thanh

Tung Phan Thanh

Күн бұрын

nguoileonui.com...
Lập trình Pascal-Bài 5: Câu lệnh lặp for..to..do;while..do
EMail:tungptkh@gmail.com

Пікірлер: 226
@angpham7329
@angpham7329 6 жыл бұрын
giảng dễ hiểu thật
@TranNguyen-rp4rc
@TranNguyen-rp4rc 2 жыл бұрын
Tìm đc anh đúng là chân ái
@dokuresz9796
@dokuresz9796 5 жыл бұрын
dc duyet
@fssmc6789
@fssmc6789 5 жыл бұрын
Ak em hiểu rồi
@45.khanhtuyet34
@45.khanhtuyet34 3 жыл бұрын
dễ hiểu hơn ông thầy dạy trên trường
@hoami8320
@hoami8320 3 жыл бұрын
gần 9 năm dồi
@khoixuan7828
@khoixuan7828 4 жыл бұрын
hiểu sương sương
@luyentruong88
@luyentruong88 11 жыл бұрын
ban lam giup minh bai tap nay nha viet chuong trinh in ra bang cuu chuong 2 nhanh len nha
@comwia
@comwia 3 жыл бұрын
uses crt; var i:integer; begin clrscr; for i:= 1 to 10 do writeln('2 x ',i,' = ',2*i); readln; end.
@nhatkhang7112
@nhatkhang7112 3 жыл бұрын
ghê thiệt tự viết pascal mod luôn
@nguyenuckhoa2280
@nguyenuckhoa2280 10 жыл бұрын
lam giup minh: viet mot chuong trinh pascal in ra man hinh cac so nguyen to khong qua n duoc nhap vao tu ban phim va tinh tong cac so do.
@vinhpc222
@vinhpc222 2 жыл бұрын
anh chỉ em cách tải java đi ạ
@ngocvu1434
@ngocvu1434 3 жыл бұрын
Bày hack đi anh
@thcsthanhphutv2823
@thcsthanhphutv2823 4 жыл бұрын
thay su dung phan mem ji vay ?
@daohung1112
@daohung1112 5 жыл бұрын
Có ai còn xem ko ạ. E mới học. Cho em hỏi câu mở đầu uses crt có ý nghĩa gì ạ?
@danggthinhh9097
@danggthinhh9097 5 жыл бұрын
Đó là khai báo thư viện bạn nhé :)
@Dakhuc_59
@Dakhuc_59 4 жыл бұрын
@@danggthinhh9097 cái đó ai cũng biết nhưng chưa chắc ai cũng biết thư viện là j nếu ko đc giải thích
@anhphanduc3561
@anhphanduc3561 10 жыл бұрын
anh tai pascal nay o dau ma nhin dep zay a
@thanhtungdp
@thanhtungdp 10 жыл бұрын
Phần mềm này mình tự lập trình www.mediafire.com/download/9l6f278s737sqxf/JPasCal.rar Nhớ phải cài JDK 7 và Free Pascal trước khi dùng phần mềm
@anhphanduc3561
@anhphanduc3561 10 жыл бұрын
Tung Phan Thanh cai the nao zay a
@ducsmith
@ducsmith 10 жыл бұрын
Tung Phan Thanh anh ơi chạy cái đấy như thế nào ạ?
@nhanto5414
@nhanto5414 8 жыл бұрын
+Minh Đức Nguyễn ổng hướng dẫn ở trên rồi, google là ra
@tuhocmontoan4321
@tuhocmontoan4321 8 жыл бұрын
bạn có thể cho mình link cài đặt ko, minh tim ko thấy, thanks.
@Dakhuc_59
@Dakhuc_59 4 жыл бұрын
16:31 Ai đó giải thích hộ mình là tại sao lại cần 2 dòng readln đc k0 '-'
@tuan2473
@tuan2473 4 жыл бұрын
bị thừa thôi không ảnh hưởng gì cả
@TranQBaocuto601
@TranQBaocuto601 2 жыл бұрын
cho e xin cai ide được ko thầy
@phucuongnguyen4537
@phucuongnguyen4537 9 жыл бұрын
hoi ko hieu anh oi
@cauhu3041
@cauhu3041 6 жыл бұрын
giúp e bài này vs bạn có a đồng gửi ngân hàng vs lãi suất 3.1% mỗi tháng(lãi xuất k cộng dồn vào vốn gốc). Lập trình tì và thông báo số tháng cần gửi nếu bạn muốn nhận số tiền ít nhất là x. (vs số tiền a,x đc nhập từ bàn phím.1000
@kuineko5491
@kuineko5491 10 жыл бұрын
jpascal của bạn dùng thế nào?
@thanhtungdp
@thanhtungdp 10 жыл бұрын
thì dùng như free pascal, nhưng về giao diện mình viết lại nó trên Java. Công việc code rất nhanh
@hientranchaucong7117
@hientranchaucong7117 8 жыл бұрын
anh cho em hỏi em muốn dùng for chung với if được ko nếu được chỉ em với
@hientranchaucong7117
@hientranchaucong7117 8 жыл бұрын
câu lệnh lặp có sử dụng chung với câu lệnh lặp ko
@Sally2303
@Sally2303 4 жыл бұрын
cho xin cái link phần mềm
@huutrong622
@huutrong622 3 жыл бұрын
anh dùng ứng dụng j v anh
@nguyenthao-ht2ml
@nguyenthao-ht2ml 5 жыл бұрын
cô e giọng huế, vừa mơ mộng vừa chua chát, nghe mắc mệt luôn á
@trannguyennhatminh825
@trannguyennhatminh825 7 жыл бұрын
Nếu thầy giáo mà giảng thế này thì học sinh học cực vào quá !
@trannguyennhatminh825
@trannguyennhatminh825 7 жыл бұрын
mà anh dùng chương trình gì zậy, chỉ cho e với
@quocan900
@quocan900 3 жыл бұрын
anh dùng app pascal gì vậy ạ
@khoahoccongnghe2145
@khoahoccongnghe2145 6 жыл бұрын
cám ơn anh rất nhiều anh làm dễ hiểu quá
@Hang-mq7xt
@Hang-mq7xt 2 жыл бұрын
Huhu rối quá mn à😢
@nhato3906
@nhato3906 7 жыл бұрын
cach tinh tong va tich = cau lenh lap ntn
@scendyhieu7917
@scendyhieu7917 5 жыл бұрын
Ba năm rồi mới xem lại Cảm ơn anh vì những video của anh đã giúp em học tốt môn tin Mong rằng 4 năm nữa ta sẽ là đồng nghiệp
@rukato2908
@rukato2908 Жыл бұрын
Và cái cmt này đc ba năm rồi:)))
@thuthao6640
@thuthao6640 9 жыл бұрын
có video nào về tệp và thao tác tệp không. mìh kím mà không gặp
@iamanewbie3273
@iamanewbie3273 8 жыл бұрын
down lap trinh java dau zay
@hongthamnguyen1676
@hongthamnguyen1676 5 жыл бұрын
dễ hiểu cảm ơn admin nhiều
@thikimxuyendang7036
@thikimxuyendang7036 10 жыл бұрын
tải cái này về máy được k ạ?
@xuannhu2138
@xuannhu2138 9 жыл бұрын
Thi Kim Xuyen Dang đc link www.mediafire.com/download/0lp9hrve0abt266/SinhVienIT.Net---Turbo-Pascal-7%28Full%29.rar
@vudls
@vudls 5 жыл бұрын
Anh ơi tại sao Lại pải gán S:=0 Ạ
@vutoan746
@vutoan746 5 жыл бұрын
cho giá trị đầu của S đó là 0
@kuineko5491
@kuineko5491 10 жыл бұрын
ý mình là mở nó lên ấy
@gialinh80
@gialinh80 9 жыл бұрын
anh ơi em chưa hiểu câu lệnh while ...do
@phambahao6160
@phambahao6160 5 жыл бұрын
Vãi loèn a hài vãi
@vipham4906
@vipham4906 10 жыл бұрын
a cho e xin phần mềm lập trình dok đi.. hướng dẫn tí thấy sử dụng dễ nhanh à.tks a :))
@toanminer4795
@toanminer4795 5 жыл бұрын
Hãi thật, phần câu lệnh lặp này rất khó, mà hc cuối cc hk1 8☺ r kt th sao nhớ nổi. Phải mik tự thục hành ms hỉu, chứ hc thuộc không là cái nghĩa địa gì hết☺
@phongle8731
@phongle8731 8 жыл бұрын
Nghe giọng thầy giống Trấn Thành
@tuanchautinh8828
@tuanchautinh8828 6 жыл бұрын
Ad cho em hỏi làm sao đêt thâm nhận một chiếc điện thội adroii .
@diemhuongpham3615
@diemhuongpham3615 11 жыл бұрын
khi nao thi dung bien tmp ?
@pkvotinh459
@pkvotinh459 11 жыл бұрын
tks a nhé học pascal cảm thấy rất hứng thú
@tieuhoangphuc7425
@tieuhoangphuc7425 6 жыл бұрын
Bài cuối em ko hỉu anh ơi
@tuduykhoahoc8907
@tuduykhoahoc8907 3 жыл бұрын
Cho em fb anh đc k ạ
@comwia
@comwia 3 жыл бұрын
hình như fb ad là *Tùng Cu* thì phải.. mình không rõ nữa...
@_TranThiQuynhNhu_A-vr7yo
@_TranThiQuynhNhu_A-vr7yo 5 жыл бұрын
Hay
@kienle3532
@kienle3532 8 жыл бұрын
Cho e hỏi là ba cái loại này có thể thay thế nhau được không anh
@ngocminh6720
@ngocminh6720 5 жыл бұрын
Huhu cái bài cuối vt thẳng hàng có tmp ý ạ e ko hiểu lắm tại sao lại có tmp như vâyh ạ
@nguyenphan4333
@nguyenphan4333 8 жыл бұрын
a ơi cho em xin bài power point với
@thanhhoang4559
@thanhhoang4559 8 жыл бұрын
thanks anh nhờ anh mà e hiểu r ạ c
@diuo1402
@diuo1402 4 жыл бұрын
học hành j giờ này nhà bảo việc 🏢🏢🏢🏢🏢🏢🏢🏢🏢🏢🏢🏢🏢 🔚
@gialinh80
@gialinh80 9 жыл бұрын
giúp em với
@nhato3906
@nhato3906 8 жыл бұрын
anh oi tinh tong va tich bang cau lenh for do lam sao
@hoquochung79
@hoquochung79 7 жыл бұрын
CHO MINHXIN CAI LINK CUA CAI PASCAL NAY NHE
@hoangphuctran574
@hoangphuctran574 6 жыл бұрын
anh ơi em tải java về rồi em ko tìm thấy chương trình anh chỉ em đi
@vuhanh5756
@vuhanh5756 6 жыл бұрын
anh ơi chỗ đoạn in thành 2 hang tu 1-14 e vẫn chưa hiểu vai trò của biến i và j cho lắm
@tuongvy6309
@tuongvy6309 6 жыл бұрын
Cho em hỏi là cách chuyển đổi từ while do sang for do với ạ
@windysunskymetalmicro
@windysunskymetalmicro 6 жыл бұрын
phần mềm pascal anh làm tải ở đâu vậy
@osctan2832
@osctan2832 8 жыл бұрын
làm thêm đi anh ơi
@29.leanhtuan17
@29.leanhtuan17 5 жыл бұрын
em nể anh rồi đó vãi ca tom and jerry
@mytran-zb6en
@mytran-zb6en 9 жыл бұрын
hay quá anh ơi :))))))) cảm ơn anh nhiều cái while do ý khó hiểu mà nghe anh giảng thông đầu luôn dồi
@thuvu9883
@thuvu9883 7 жыл бұрын
Lam on giai giup toi bai tap nay! De bai: Viet chuong trinh nhap vao so nguyen duong N, sau do tinh tong cac so tu 1 den N ? ( Dung lenh While... Do nha!)
@tonghuong8258
@tonghuong8258 3 жыл бұрын
Var N,S: integer; Writeln('Nhập số n: '); Readln(n); For i:= 1 to n do: Begin S := S + i; End; Write(S);
@tokhanh8478
@tokhanh8478 10 жыл бұрын
anhoi cho e xin like tai phan mem a dg dung vs a
@trangphan3383
@trangphan3383 6 жыл бұрын
ai giang cho milk vi sao can bien tam z??
@best_zik_zik3559
@best_zik_zik3559 8 жыл бұрын
Anh cho em xin cái link để tải phần mềm pascal này đi
@loanthaonguyenthi5673
@loanthaonguyenthi5673 10 жыл бұрын
mình muốn down phần turbo này về xài, ai có link cho xin vs
@tuananhnguyentran445
@tuananhnguyentran445 9 жыл бұрын
loan thảo nguyễn thị ghi free pascal trên google là dc
@hoanglexuan7861
@hoanglexuan7861 7 жыл бұрын
Vậy nhiều hơn 2 câu lệnh phải để begin...end; ak?
@tonghuong8258
@tonghuong8258 3 жыл бұрын
@trangha8417
@trangha8417 9 жыл бұрын
cảm ơn anh rất nhiều a dạy hay cực ,ước j e xem video nay trước bài kt 1 tiết vừa dui
@NguyenTran-yp2wi
@NguyenTran-yp2wi 4 жыл бұрын
Anh giảng hay quá a ơi
@_NguyenNganHa
@_NguyenNganHa 9 жыл бұрын
tại sao phải để s:= 0; ở câu lệnh while... do
@comwia
@comwia 3 жыл бұрын
gán s bằng 0 đó ạ
@tuphunganh821
@tuphunganh821 9 жыл бұрын
Bạn ơi mình xác định biến đếm làmsao
@tanphaminh7814
@tanphaminh7814 3 жыл бұрын
Nhờ thầy giúp bài này lớp 8. Gia đình bạn Tuấn có 1 cửa hàng tạp hóa nhỏ. Cuối mỗi ngày, mẹ của Tuấn thường phải cộng số tiền trên các hóa đơn trong ngày để biết tổng số tiền thu được. Em hãy giúp mẹ bạn Tuấn viết thuật toán để nhập số tiền trên các hóa đơn vào máy tính và in ra tổng số tiền. Các số được nhập liên tục và việc nhập kết thúc khi số 0 được nhập vào. Cảm ơn thầy nhiều ạ!
@huynhtanloc6840
@huynhtanloc6840 7 жыл бұрын
Có những cái chưa học mà anh kêu ra làm em ko hỉu
@lucnguyen4470
@lucnguyen4470 7 жыл бұрын
anh ơi ai dạy cách sử dụng div và mod đi
@haitrinhxuan5138
@haitrinhxuan5138 9 жыл бұрын
Anh làm thêm Clip đi!!!, A làm hay quá!!!. em search nát youtube chỉ học được với mỗi a thôi :((
@darkroket4954
@darkroket4954 7 жыл бұрын
S trong while do là gì v
@ninhnhat1460
@ninhnhat1460 8 жыл бұрын
ai bày tui tính tổng lẻ bằng while do dc ko
@thuantran-rd1br
@thuantran-rd1br 8 жыл бұрын
anh biết đánh bảng từ 1 đến 99 ko anh
@QuanNguyen-cr7
@QuanNguyen-cr7 3 жыл бұрын
hài quá :))
@khoahoccongnghe2145
@khoahoccongnghe2145 6 жыл бұрын
anh ơi sao có mấy dòng anh thuộc vào chi vậy anh
@nhato3906
@nhato3906 8 жыл бұрын
anh oi chi cho em cau lenh while do di em ko hieu phep tinh cua no
@thieuvantoi9683
@thieuvantoi9683 9 жыл бұрын
sao cai link kia ko zo dk
@thuantran-rd1br
@thuantran-rd1br 8 жыл бұрын
chỉ giúp
@TMT-tp8rk
@TMT-tp8rk 6 жыл бұрын
mong các anh tạo Video có bài tập thât nhiều và phong phú hơn nữa. Thank you!
@ThanhHuynh-gm7by
@ThanhHuynh-gm7by 10 жыл бұрын
câu Function trong PC là s a?
@huynhanhquach891
@huynhanhquach891 8 жыл бұрын
anh nói chuyện dễ thương quá ^^ nói dễ hiểu nữa, cảm ơn anh rất nhiều.
@rayy6303
@rayy6303 8 жыл бұрын
ad cho e xin cái phần mềm pascal của anh đi
@vananhnguyen295
@vananhnguyen295 8 жыл бұрын
pascal của anh có giống pascal thường ko ạ?
@huonggiang7150
@huonggiang7150 10 жыл бұрын
anh chị ơi em mới học lớp 7 nhg em mún thi tin học trẻ nên thầy em bảo phải học phần mềm pascal vậy theo anh chị học có khó hay không và cái khó nhất khi học phầm mềm này là gì aaaaaaaaaaaaaaaaaaaaa
@toncatdan4029
@toncatdan4029 7 жыл бұрын
N với i trong câu lệnh while ... do là gì v anh
@xyber3583
@xyber3583 6 жыл бұрын
cho m hỏi bn dùng IDE nào vậy(trông giống visual studio)
@buithientainguyen4346
@buithientainguyen4346 7 жыл бұрын
anh ơi cho em hỏi readln với writeln có nghĩa là sao vậy ạ
@tonghuong8258
@tonghuong8258 3 жыл бұрын
Readln có 2 nghĩa: Readln({Tên biến}); dùng để thông báo máy tính về thu thập dữ liệu, hay gọi là input. Khi nhập dữ liệu thì con trỏ xử lý của chương trình sẽ di chuyển xuống 1 hàng. Trước readln dạng 1 sẽ có hàm Writeln({Chữ ghi}); Readln; loại 2, dùng để dừng màn hình output khi và chỉ khi bấm nút enter Writeln({Chữ ghi}); Dùng để in ra màn hình các ký tự và đưa con trỏ xử lý chương trình xuống dưới một hàng như readln();
@nguyentuongictu2225
@nguyentuongictu2225 11 жыл бұрын
theo em tính tổng từ 1 đến 3 thì cứ lấy 1+2+3=6. đỡ lằng nhằng.
@KhanhNguyen-fk6xu
@KhanhNguyen-fk6xu 7 жыл бұрын
E gần kiểm tra rồi, mà mấy hôm nay e nghỉ Mấy bro giải hộ e với Câu 1: Viết chương trình nhập vào các số nguyên cho đến khi nào gặp số 0 thì kết thúc. Hãy đếm xem có bao nhiêu số chẵn vừa đc nhập vào
@comwia
@comwia 3 жыл бұрын
uses crt; var n,i,dem:integer; a:array[1..100]of integer; begin clrscr; write('nhap n='); readln(n); for i:=1 to n do begin write('a[',i,']='); readln(a[i]); if a[i]=0 then exit end; dem:=0; for i:=1 to n do if a[i] mod 2=0 then inc(dem); writeln('so luong so chan ban vua nhap vao la: ',dem); readln; end.
@QuyenTran-ml7vg
@QuyenTran-ml7vg 9 жыл бұрын
Nghỉ học trên trg về học cái này còn dễ hiểu hơn
@thuantran-rd1br
@thuantran-rd1br 8 жыл бұрын
bày giùm em bảng từ 1 đến 99 dc ko ạ
@nhutrinh5226
@nhutrinh5226 5 жыл бұрын
Mấy bạn ơi qua học tin học bổ ích á dạy hay hơn nhiều!!!!
@phungnguyen-ti6ix
@phungnguyen-ti6ix 8 жыл бұрын
Anh cho em link tải pascal với anh.em ko biết link
@quyentroll6150
@quyentroll6150 8 жыл бұрын
Anh Thanh ơi, làm bài 7 đi anh.
@teneoco6732
@teneoco6732 8 жыл бұрын
cho link down phần mềm này đi a. Giao diện đẹp quá.
@thiinh9289
@thiinh9289 7 жыл бұрын
trong câu lệnh while điều kiện là i
@bithao6908
@bithao6908 2 жыл бұрын
I:=1 bạn
@fanmiley8424
@fanmiley8424 10 жыл бұрын
a gjảg ngke dễ hiểu hơn bà cô dạy tjn trg e :)
@thinhphantruongphu5526
@thinhphantruongphu5526 2 жыл бұрын
Me too :)))
Lập trình Pascal-Bài 6: Mảng trong Pascal
31:59
Tung Phan Thanh
Рет қаралды 97 М.
Quando A Diferença De Altura É Muito Grande 😲😂
00:12
Mari Maria
Рет қаралды 45 МЛН
Beat Ronaldo, Win $1,000,000
22:45
MrBeast
Рет қаралды 158 МЛН
Что-что Мурсдей говорит? 💭 #симбочка #симба #мурсдей
00:19
How to use SSHFS and when you should not
4:18
MikroTik
Рет қаралды 1,7 М.
I made Tetris in C, this is what I learned
15:15
Austin Larsen
Рет қаралды 31 М.
C - Bài 13: Cấu trúc điều khiển lặp do-while.
7:24
thân triệu
Рет қаралды 101 М.
Tự chế kính thiên văn Trung Thu - DIY Telescope
11:01
Táy Máy Tò Mò
Рет қаралды 32 М.