giả sử số tiền điện nhà em tiêu thụ trong 1 tháng là b,biết rằng tiền điện tiêu dùng mỗi hộ được tính như sau: 100 số đầu tiên:mỗi số phải trả 550đ từ số 101:mỗi số phải trả 1200đ a)viết chương trình để tính và in kết quả ra màn hình tiền điện phải trả trong tháng bằng ngôn ngữ lập trình pascal

2 câu trả lời

program tinhtien;

uses crt;

var a:longint; tiendien:real;

begin

clrscr;

readln(a);

if a<=100 then tiendien:=a*550;

else if a>=101 then tiendien:=100*550+1200*(a-100);

Writeln('so tien dien trong thang la:',tiendien:9:0,'VND');

readln;

END.

Viết chương trình để tính và in kết quả ra màn hình tiền điện phải trả trong tháng bằng ngôn ngữ lập trình pascal:

GIẢI

program Tinhtien;
uses crt;
var a: longint; 
tiendien: real;
begin
clrscr;
writeln('Nhap a: ');
readln(a);
if a<=100 then tiendien:=a*550;
else if a>=101 then tiendien:=100*550+1200*(a-100);
Writeln('so tien dien trong thang la:',tiendien:9:0,'VND');
readln;
end.