Chương trình đổi tiền Nhập 3 loại tiền và số tiền cần đổi. Hãy tìm tất cả các tổ hợp có được của 3 loại tiền trên cho số tiền vừa nhập. Program Doi_Tien; Uses crt; Var x,y,z,n,i,j,h:longint; Begin Clrscr; Writeln(‘CHUONG TRINH DOI TIEN:’); Write(‘Nhap so tien can doi n = ‘);readln(n); Write(‘Nhap loai tien thu 1: ‘);readln(x); Write(‘Nhap loai tien thu 2: ‘);readln(y); Write(‘Nhap loai tien thu 3: ‘);readln(z); Writeln(‘Loai ‘,x:4,’ Loai ‘,y:4,’ Loai ‘,z:4); For i:=0 to (n div x) do For j:=0 to (n div y) do For h:= 0 to (n div z) do If (i*x+j*y+h*z=n)…
Tác giả: Đình Trọng
Đình Trọng
٩(●̮̮̃•̃)۶ Không có lẽ yêu trên đời quá khó ٩(͡๏̯͡๏)۶ Mà thôi yêu cũng chẳng dễ chút nào! ٩(×̯×)۶
Vẽ cờ đỏ sao vàng – Quốc kỳ theo đúng tỷ lệ. Hiện nay trên Fanpage có 2 cách giải, với 2 cách giải trên thì code rất đơn giản và dễ hiểu, nhất là của thầy Ngọc Nguyễn, tuy nhiên có một vấn đề trong 2 cách trên đó là tính độ dài cạnh của ngôi sao như thế nào? Công thức 60 x 4/5 = 48 vẫn còn chưa thuyết phục một số thầy cô. Trước đây chúng tôi có giải một bài toán vẽ ngôi sao khi mà biết độ dài từ đỉnh tới tâm của nó,…
Một bạn đọc gửit in nhắn cho chúng tôi hỏi làm sao để vẽ 5 hình tròn biểu tượng của Olympic bằng MSWLogo, thật ra câu hỏi này không khó tuy nhiên nó cũng không hề đơn giản nhé. Cách 1: Ở bài này chúng tôi sẽ xác định tọa độ tâm của 5 hình tròn, các bạn có thể vẽ nó ra trên giấy rồi sau đó tính toán thử, ở trong bài này tôi đặt đường tròn A và C trên đỉnh của tam giác đều cạnh 200 và B và D thì có tâm ở đỉnh lùi…
Bài 1 mình đã hướng dẫn rồi bài 2 :Hình xoắn ốc được vẽ bắt đầu từ một đoạn thẳng có độ dài 50 nối tiếp các đoạn thẳng mới được xác định bằng cách xoay đoạn thẳng đó sang phải một góc 20 độ và có độ dài bằng 0.95 của đoạn thẳng đứng trước. Quá trình đó được lặp lại đến khi đoạn thẳng có độ dài nhỏ hơn 1. Bài này tương đối dễ, nhưng không hiểu sao cái hình mình vẽ không giống lắm so với cái hình trong đề, vòng lặp có thể dùng while…
Một bạn có hỏi cách giải bài lập trình pascal như nhau : 1. Nhập vào mảng n phần tử xuất ra tổng của các số nguyên tố trong mảng đó. Đây là một đề tương đối dễ, do đó chúng tôi sẽ trình bày bài ở dạng sử dụng hàm để các bạn tiếp nhận thêm kiến thức. Hàm ở đây tên là NT với tham trị đưa vào là một con số và hàm này sẽ kiểm tra xem số đó có phải là số nguyên tố hay không, việc kiểm tra được thực hiện qua vòng lặp…
REPEATER: Trong hệ thống mạng LAN, khoảng cách truyền dẫn tín hiệu tối đa là 100m, đối với dây cáp mạng UTP CAT5e. Do đó, khi khách hàng muốn truyền tín hiệu ở một khoảng cách xa hơn thì cần một bộ khuếch đại và định thời lại tín hiệu, giúp tín hiệu có thể truyền dẫn đi xa hơn giới hạn 100m này. REPEATER chính là một thiết bị như trên. HUB: Hub có thể được xem là một Repeater có nhiều cổng. Nhưng HUB là gì? Một Hub có từ 4 đến 24 cổng và có thể còn…
Mảng là một kiểu dữ liệu mà nó có thể chứa nhiều giá trị con bên trong. Hãy tưởng tượng như một mảng là một đoàn tàu (xe lửa), mỗi toa là phần của mảng và nó mang một giá trị (value) toa xe được đánh số (key) để nhận biết. Trong MSWLogo muốn khai báo một mảng ta dùng MAKE “tênmảng (ARRAY độ.dài số.bắt.đầu) Ví dụ Make mau_sac (Array 7 1) tạo một mảng có tên là mau_sac mảng này có 7 phần tử ( toa tàu) và toa đầu tiên đánh số là 1. Để gán một giá…
Đề bài : Một miếng bìa hình vuông, có cạnh 200, người ta đục 4 lỗ hình tròn nằm sát giữa của các cạnh miếng bìa đó với bán kính đường tròn là 30. Em hãy sử dụng các câu lệnh trong MSW Logo vẽ lại miếng bìa khi đục lỗ và tính diện tích còn lại… Em hãy lưu kết quả trong tệp văn bản có tên hinhvuong.doc gồm: – Hình em đã vẽ – Các câu lệnh của MSWLogo theo trình tự đã vẽ Cách 1: to hinhvuong repeat 4[ fd 200 rt 90] setxy 0 100 circle2…
Đề bài : Trong vườn cây người ta đếm thấy có tổng cộng 9 cây, được trồng thành 10 hàng, và mỗi hàng có 3 cây. + Em hãy viết các câu lệnh trong chương trình MSWLogo để vẽ lại sơ đồ vườn cây trên. + Hãy lưu kết quả trong tập tin văn bản có tên trongcay.doc gồm: – Hình sơ đồ vườn cây trên – Tất cả câu lệnh MSWLogo theo trình tự đã vẽ. Phân tích: Đây là một dạng bài khó, nếu không biết xắp xếp cây cho đúng thì xem như khỏi làm. Đây là…
Đề bài: Nhập vào 1 chuỗi trong đó có rất nhiều khoảng trắng, hãy cắt hết các khoảng trắng thừa ở đầu, giữa và cuối ví dụ:” Nguyen Van Teo “ sau khi xử lý xuất ra “Nguyen Văn Teo” Cách làm: Chạy vòng lặp kiểm tra xem trong chuỗi có 2 khoảng trắng liên tiếp nhau không, nếu có thì xóa 1 khoảng trắng đi, khi kết thúc vòng lặp này thì không còn 2 khoảng trắng nào liên tiếp nhau While Pos(‘ ‘,s)>0 Do Delete(s,pos(‘ ‘,s),1); kế đó kiểm tra ký tự đầu tiên và cuối cùng có…
Các bạn làm theo hình hướng dẫn: Bước 1 : Khởi động MswLogo và bấm nút Edall Bước 2: ta thấy xuất hiện một cửa sổ, đây là nơi bạn sẽ viết các lệnh của mswlogo, theo sau to là tên của một chương trình, nếu có nhiều chương trình thì các bạn cứ viết To TênChươngTrình End nếu các bạn muốn truyền vào các biến cho chương trình thì ghi dấu : trước tên biến xem hình Bước 3 : Trong cửa sổ này hãy bấm File-> Save and exit để quay về cửa sổ chính, nếu bạn muốn…
Đề bài Dùng MSWLogo vẽ hình trên : Phân tích : Hình trên được tạo bởi các hình ngũ giác xếp chồng vào nhau Chúng ta sẽ lặp lại 5 lần công việc vẽ 1 hình ngũ giác ở các vị trí khác nhau. Các bạn để ý sẽ thấy việc vẽ ngũ giác nhỏ lặp 7 lần vì sao vậy? Mục đích là để cho rùa đi tới vị trí đỉnh kế tiếp để vẽ ngũ giác tiếp theo. Code thật ra rất đơn giản chúng tôi thêm dòng lệnh chờ Wait 500 giúp các bạn dễ hình dung…