Bài 5. Từ bài toán đến chương trình

TK
Viết chương trình pascal thực hiện các công việc sau: Nhập một thứ trong tuần In ra màn hình nghĩ tiếng Anh của thứ vừa nhập
NT
27 tháng 12 2020 lúc 10:48

uses crt;

var thu:integer;

begin

clrscr;

repeat

write('Nhap thu:'); readln(thu);

until (2<=thu) and (thu<=8);

case thu of

2: writeln('Monday');

3: writeln('Tuesday');

4: writeln('Wednesday');

5: writeln('Thursday');

6: writeln('Friday');

7: writeln('Saturday');

8: writeln('Sunday');

end;

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
KN
Xem chi tiết
MN
Xem chi tiết
KT
Xem chi tiết
H24
Xem chi tiết
HT
Xem chi tiết
YN
Xem chi tiết
DP
Xem chi tiết
NA
Xem chi tiết
TB
Xem chi tiết