Page 8 - Tin Học 11 - Chương III

Tin học 11 Tập 2

Tuấn, Khôi, Toàn là ba người bạn. Chiều cao của Khôi là a, chiều cao của Tuấn là b,
chiều cao của Toàn là c. Nhập vào ba số nguyên dương a, b, c, tìm xem Khôi là
người cao thứ mấy, biết rằng Tuấn luôn cao hơn Toàn và chiều cao ba bạn khác
nhau.

Gợi ý:

if a>b then writeln(‘Khoi la nguoi cao nhat’)

else if a>c then writeln(‘Khoi la nguoi cao thu nhi’);

Và còn rất nhiều dạng câu lệnh khác liên quan đến if-then-else mà chúng ta sẽ phải
sử dụng tuỳ vào dạng bài tập.

Câu lệnh ghép:

Theo cú pháp, sau mốt số từ khoá như then hoặc else phải là một câu lệnh. Nhưng
đôi khi, các thao tác sau đó khá phức tạp mà phải sử dụng nhiều câu lệnh để mô tả.
Trong các trường hợp như vậy, ngôn ngữ lập trình cho phép gộp một dãy câu lệnh
thành một câu lệnh ghép.

Trong Pascal thì câu lệnh ghép đó có dạng:

begin
<các câu lệnh>;
end;

Ví dụ:
Một hôm, mẹ cho Trinh và em gái lần lượt là a cục kẹo và b cục kẹo. Trinh rất thương
em nên nếu số kẹo của Trinh lớn hơn em thì Trinh sẽ chia bớt số kẹo của mình sao
cho số kẹo của hai chị em là bằng nhau. Còn nếu số kẹo của em gái lớn hơn hoặc
bằng của Trinh thì số kẹo của hai chị em sẽ được giữ nguyên, có nghĩa là số kẹo Trinh
cho em gái là 0. Nhập vào hai số nguyên dương a và b, hãy tìm số kẹo Trinh cho em
gái, biết số kẹo của hai chị em đều có thể chia đều.

Gợi ý:
if b>=a then writeln(‘So keo Trinh cho em gai la: 0’)

else
begin
x:=(a+b)/2;

sokeo:=x-a;
writeln(‘So keo Trinh cho em gai la: ‘,sokeo);
end;

8