..:A1 05 - 08's E Diary:..

Tình trạng
Không mở trả lời sau này.
tớ cũng xin nhoi 1 chân nói chuyện :)) :)) :))
hàng Thanh gần hồ Giảng Võ phết ;;) ngát ạ =)) :)) :))
 
Bài toán tính tiền điện đây

program tiendien; {Written by Vu Chi Hieu lop 10 Tin}
uses crt;
var n,t,i,k,m,j:longint; s:string;
cs:boolean;
begin
write('Nhap so dien : '); readln(n);
if n<100 then begin t:=500*n; n:=0; end else begin n:=n-100; t:=500*100; end;
if n<50 then begin t:=t+700*n; n:=0; end else begin n:=n-50; t:=50*700; end;
t:=t+900*n;
writeln('So tien : ',t);
s:=''; i:=0; k:=t;
while k>0 do
begin
inc(i);
k:=k div 10;
end;
while i>0 do
begin
m:=1;
for j:=1 to i-1 do m:=m*10;
k:=t div m;
t:=t mod m;
cs:=false;
case k of
1:s:=s+'mot ';
2:s:=s+'hai ';
3:s:=s+'ba ';
4:s:=s+'bon ';
5:s:=s+'nam ';
6:s:=s+'sau ';
7:s:=s+'bay ';
8:s:=s+'tam ';
9:s:=s+'chin ';
0:cs:=true;
end;
if (i mod 3 = 0) and (k<>0) then s:=s+'tram ';
if (i mod 3 = 2) then
if (k=0) and (t*10 div m <> 0) then s:=s+'le ' else
if not cs then s:=s+'muoi ';
if (i mod 3 = 1) then
case i div 3 of
1:s:=s+'ngan ';
2:s:=s+'trieu ';
3:s:=s+'ti ';
4:s:=s+'ngan ti ';
end;
dec(i);
end;
writeln('Bang chu : ',s,'dong');
readln;
end.

Độ chính xác 99,99% đã qua chạy và test thử
 
Chỉnh sửa lần cuối:
ah không tớ muốn mời ấy đến khu vực gần trường tớ ý đằng nào cũng trên đường ấy về nhà mà.Thế nhé.hôm đấy bọn tớ sẽ lên đón ấy.ok.gặp lại ấy sau
 
mẹ tớ có đc đi cùng ko :-/ mẹ tớ đón tớ về mà :-/
"bọn tớ" tức là có hơn 1 người à :-?
 
nhà tớ cũng gần đấy ấy ah ;;)
tớ là tớ muốn nhoi lắm í =)) :)) :))
ấy có bọn ấy
thì tớ cũng có bọn tớ chứ ;;)
 
Chuyện j thế bạn nào mà cứ vào tô bích lớp mình nói những cái câu j mà ''đón ấy'' nghe rất là .......:-? khiêu khích?
Nếu mả thế thì add nick rồi thì nói với nhau nhé, đây ko phải là nơi thích hợp đâu:)|
 
Uh nhưng mà kể ra chuyện này hay đấy ;;) 2 gấu nhỉ;;)
Làm cho ra nhẽ thì cũng hay ;;)
 
thứ 5 gấu ko phải đi học thêm gì cả :)) :)) :))

mà mai xin hoãn ktra văn đi :-s
học cả GDCD cả Văn đỡ sao đc :-s :( :((
mà GDCD toàn từ ngữ cao siêu
văn thì văn tế :| đỡ thế nào đây :| toàn nương tử với chả tử nương mệt thế :-< :( :|
đang chán quá
hic poz bài cuối trước khi đi học thêm :*
 
Giá bán lẻ điện năng tiêu dùng sinh hoạt bậc thang

Cho 100 kwh đầu tiên..........500 (đồng/kwh)

Cho 50 kwh tiếp theo..........704 (đồng/kwh)

Cho 50 kwh tiếp theo..........957 (đồng/kwh)

Cho 100 kwh tiếp theo........1166 (đồng/kwh)

Từ 1kwh thứ 301 trở lên......1397 (đồng/kwh)
 
nik bạn Đỗ Thanh Huyền là j vậy để tớ add minh cùng nói chuyện
 
Uh nick ấy là j nói đi vì căn bản nhiều bạn cần nick ấy lắm rồi
Ấy cứ pốt nick ấy lên đây
Hẵng có nhiều bạn mới add :D
Bạn Nam của ấy ''học vãi cả đỉnh'', ''vãi cả đẹp trai'', ''vãi cả thông minh'':)) cưa mãi ko đc bạn ngồi cạnh tớ khổ thế chứ:)):)):)) Chà Nam ơi, tao nhớ mới đây thôi mày còn nhờ vả tao nói tốt trc' mặt cái Hạnh, chuyện trôi qua lặng lẽ quá nh:))
Chúng mày ơi tao nhớ lại cái vụ TVHS rồi, hay quá, lại đc chửi nhau
Có tí gia vị cũng hay
Lần trước mình đầu mưu, lần này để ngân hà phí quá đi
Ko sao, làm cheerleader hãy còn '' thích '' chán;;) Ko có Mo lên join cùng chị em nhỉ;;)
Ấy mod ơi mod đẹp zai mát tay em nói j ko phải mod nói em 1 câu em còn sửa sai, mod giơ cao đánh khẽ ạ hí hí:D
 
Chỉnh sửa lần cuối:
ừ bạn "..." học giỏi vs đáng yêu lắm
dễ thương tốt tính
hôm tr'c còn làm quả presnt 55' cơ giỏi lắm
xinh + bụ bẫm + yêu cực
thảo nào Nam chết mê chết mệt
chả biết bây h thế nào hả tụi mày?
 
add nik tớ đc ko :''khicodonemnhoanh1990''
Nhấn để mở rộng...
À đây đây
Đây rồi bóng sáng về bản đây rồi
hẹn gặp lại
Con Dô chỉ đc cái nói đúng là ko ai bằng:))
 
Chỉnh sửa lần cuối:
tớ muốn nói chuyện với bạn í quá đi à :)) :)) :))
eo ôi
tớ thấy bạn tớ kêu ấy "xinh" lắm .... cũng cận giống tớ kìa :x
nhìn thik nhỉ =)) :)) :))
chắc nhìn xong tao dễ mà :x đc luôn quá à =)) :)) :))
mà bạn này cứ thik nói chuyện riêng tư =))
mà ko dám nói ở Ams thik rủ lên tận Trần phú
ngồi chỗ quán hồng trà hả ấy ;;) thik nhỉ hồi cấp 2 tớ ngồi đấy suốt :))
mà bọn mình có duyên với nh~ bẹn Trần Vũ nhỉ :-?
nhưng nick của bạn í cứ trí tuệ thế nào í :-s :-? :D
mà bạn í kuêu bạn í bear's heads đấy ;;)

thủy đỉnh cao thế cháu :)) :)) :))
chăm chỉ vãi soài ;;)
 
Chỉnh sửa lần cuối:
quyết định là mai xin cô nghỉ nhé
sao trong cái này có j` liên quan đến hot shit à 8-}
đứa nào biếtmoojt khi đã protect rồi thì làm sao để xóa ảnh ko?
 
mai vác cái mặt mo lên xin vậy :-s hic chán quá :(
học văn như hmâm í :-s
gdcd thì toàn nh~ ngôn từ ko thể hiểu nổi :|
mai xin hoãn ktra văn nhé :)
 
Tình trạng
Không mở trả lời sau này.
Back
Bên trên