Một số chương trình cơ bản
Trang 1 trong tổng số 1 trang
Một số chương trình cơ bản
- Code:
program chao_hoi;
uses crt;
var N:integer;
BEGIN
writeln('xin chao ban! ');
writeln('Si so lop ban la: ');
readln(N);
writeln('Xin chuc mung, ban co ','N-1',' nguoi ban moi');
readln;
END.
- Code:
program CH;
uses crt;
var i:longint;
BEGIN
write('hay lua chon mot con so ngau nhien ma ban muon');
readln(i);
if i mod 3 = 0 then write('chao mung ban den voi CLB Lua Xanh ')
else write('Rat tiec , chung toi khong the lam gi');
readln;
END.
Trang 1 trong tổng số 1 trang
Permissions in this forum:
Bạn không có quyền trả lời bài viết
|
|