Viết chương trình dịch các ngày trong tuần ra tiếng anh

150

Tailieumoi.vn biên soạn và giới thiệu bộ câu hỏi Tin học gồm các kiến thức lý thuyết và thực hành, giúp học sinh ôn tập và bổ sung kiến thức cũng như hoàn thành tốt các bài kiểm tra môn Tin học. Mời các bạn đón xem:

Top 1000 câu hỏi thường gặp môn Tin học (Phần 4)

Câu 49: Viết chương trình dịch các ngày trong tuần ra tiếng anh

Lời giải:

program ctpt;

uses crt;

  var tuan: integer;

begin

            clrscr;

            write('Nhap bat ki 1 thu trong tuan: '); readln(thu);

            case thu of

                     2 : write('Thu hai - Monday');

                     3 : write('Thu ba - Tuesday');

                     4 : write('Thu tu - Wednesday');

                     5 : write('Thu nam - Thursday');

                     6 : write('Thu sau - Friday');

                     7 : write('Thu bay - Saturday');

                     8 : write('Chu nhat - Sunday');

                     else write('Nhap sai!');

            end;

            readln

end.

Đánh giá

0

0 đánh giá