Bài tập Pascal 13

Bài 1: Cho số nguyên n.

Yêu cầu: Hãy viết chương trình cho biết n là số chẵn lẻ

Dữ liệu vào được nhập từ file  chanle.inp gồm 1 dòng ghi số nguyên n

Dữ liệu ra ghi vào file chanle.out gồm một dòng ghi chữ chan nếu n là số chẵn, ghi chữ le nếu n là số lẻ

Ví dụ:

chanle.inp	chanle.out
9	le
10	chan

Bài 2: Cho hai số nguyên a và b

Yêu cầu: Hãy viết chương trình tìm bội chung nhỏ nhất của a và b

Dữ liệu vào được nhập từ file  boi.inp gồm 1 dòng ghi số hai số nguyên a và b, hai số cách nhau một kí tự trắng

Dữ liệu ra ghi vào file boi.out gồm một dòng ghi duy nhất một số nguyên là bội chung nhỏ nhất của hai số a và b

Ví dụ:

boi.inp	boi.out
9  3	9
2 9	18

Bài 3: Cho dãy n số nguyên

Yêu cầu: Hãy viết chương trình tìm giá trị lớn nhất và giá trị nhỏ nhất của dãy số trên

Dữ liệu vào được nhập từ file  maxmin.inp gồm 2 dòng:

-dòng 1 ghi số nguyên n là số lượng số trong dãy

-dòng 2 ghi lần lượt n số trong dãy, mỗi số cách nhau 1 kí tự trắng

Dữ liệu ra ghi vào file maxmin.out gồm một dòng ghi lần lượt 2 số là giá trị lớn nhất và giá trị nhỏ nhất của dãy số, hai số cách nhau một kí tự trắng

Ví dụ:

maxmin.inp	maxmin.out
7 9 2 10 1 30 8 20	30 1

Read More

Bài tập Excel 5

Read More

Lý thuyết Word

·        Chia cột văn bản

o   Bôi đen đoạn văn bản cần chia cột

o   Vào Page LayoutèColumns

·        Tạo Drop Cap

o   Bôi đen kí tự đầu của đoạn văn bản cần tạo Drop Cap

o   Vào InsertèDrop Cap

·        Vẽ Hình

o   Vào InsertèShapesèChọn kiểu hình cần vẽ

·        Gõ văn bản vào hình vẽ

o   Phải chuột vào hình vẽèadd textègõ văn bản

·        Hình ảnh chìm dưới văn bản

o   Nháy chọn hình vẽ

o   Vào FormatèWrapTextèBehind Text

·        Tạo Tab

o   Bôi đen phần văn bản cần tạo tab

o   Vào Homeènháy nút mũi tên bên phải phía dưới nhóm công cụ Paragraph

o   Xuất hiện hộp thoại

o   Nháy nút Tabs… sau đó thiết lập các điểm dừng tab
Hướng dẫn tạo tab cho đề 2 (các em phóng to hết màn hình cho dễ quan sát)

                                              Tạo tab 

  
Tạo bảng

                                                                   Tạo nhóm

Chia cột

Read More

Bài giải Pascal

Cách 1: sử dụng for lồng while. Để tránh lỗi nên gán
biến i=t, sau đó đếm t có mấy số 0

y:=0;

for a:=m to n do
begin
    x := 0;t:=a;
    while t<>0 do
       begin
        b := t mod 10;
        t := t div 10;
        if b=0 then x:=x+1;
       end;
    y:=y+x;
end;
writeln(y);

Cách 2: Sử dụng 2 while..do lồng nhau (như các em đã được chép)




và hãy sửa đổi một tí........ để tránh lặp vô hạn😂 

hãy giải thích tại sao lại....?

Read More

Bài tập Word 3

nhấn vào đây để tải bài 1


Nhấn vào đây đêt tải bài 2

Read More