Viết chương trình tiền điện cho khách hàng nếu sử dụng lượng điện tiêu thụ 100kw trở lưu 1500đ
0 bình luận về “Viết chương trình tiền điện cho khách hàng nếu sử dụng lượng điện tiêu thụ 100kw trở lưu 1500đ”
uses crt; var n:longint; begin clrscr; write(‘Nhap so kw: ‘);readln(n); if n>100 then writeln(‘So tien: ‘,n*1500,’d’)else writeln(‘Khong can dong’); readln end.
uses crt;
var n:longint;
begin
clrscr;
write(‘Nhap so kw: ‘);readln(n);
if n>100 then writeln(‘So tien: ‘,n*1500,’d’)else
writeln(‘Khong can dong’);
readln
end.