Bạn nào biết pascal giúp mình với Gấppppppppppppp
Nhập vào từ bàn phím 1 ngày bất kỳ trong tuần, đưa ra thời khóa biểu tương ứng cho ngày đó dùng lệnh (case ... of)
Biết: Thứ 2: Tin
Thứ 3: nghỉ
Thứ 4: Toán
Thứ 5: Tin
Thứ 6: VP
Thứ 7: VP
CN : nghỉ
tks trước các bạn nha. cố giúp mìnhvới :(
Tran Van Thai
Trả lời 14 năm trước
Hê. học lớp 10 hả? ok ngay:
program thoikhoabieu;
ues crt;
var ngay:char;
begin
clrscr;
Write('Nhapngay ma ban muon xem:(2,3,4,5,6,7,CN)-yeu cau nap dung ngay:');
readln(ngay);
case ngay of
'2':writeln('Tin');
'3':writeln('Nghi');
'4':writeln('Toan');
'5':writeln('Tin');
'6':writeln('VP');
'7':writeln('VP');
'CN':writeln('Nghi');
end;
readln
end.
có gì thắc mắc liên hệ nick yahoo thutinhyeu32 giải đáp được t giúp.