1hãy viết chương trình hoàn chỉnh tính giá trị nhỏ nhất của 3 số tự nhiên a,b,c biết rằng a,b,c được nhập từ bàn phím 2 viết chương trình để tính tiền điện cho mỗi hộ dân với mức giá 100 số đầu tiên phải trả 500 đồng trên mỗi hộ dân từ 101 trở lên tính giá 1000 đồng trên 1số

dai2007

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 26 xem

1 trả lời

Thích Trả lời

tuanreus324

Bài 1:

Program BTT;
Uses crt;
Var a,b,c,min: longint;
Begin
Clrscr;
Write('Nhap a,b,c: '); Readln(a,b,c);
min:=a;
If b<min then min:=b;
If c<min then min:=c;
Write('GTNN la: ',min);
Readln
End.

Bài 2:

Program BTT;
Uses crt;
Var kWh,tt: qword;
Begin
Clrscr;
Write('Nhap so kWh: '); Readln(kWh);
If kWh<=100 then tt:=kWh*500
Else If kWh>100 then tt:=50000+(kWh-100)*1000;
Write('Tien: ',tt);
Readln
End.

Vote (0) Phản hồi (0) 2 năm trước

phantrang

Bài 1 :

uses crt;

var a, b, c, min : integer;

begin

clrscr;

write('Nhap ba so a, b, c : '); readln(a, b, c);

min := c;

if b < min then min := b;

if a < min then min := a;

write('So nho nhat : ', min);

readln

end.

Bài 2 :

uses crt;

var s, t : longint;

begin

clrscr;

write('Nhap so dien tieu thu : '); readln(s);

if s <= 100 then t := 500 * s

else t := 100 * 500 + (s - 100) * 1000;

writeln('Tien phai tra : ', t);

readln

end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Có hai xe chuyển động thẳng đều trên quãng đường AB dài 60km. Xe một chạy với vận tốc 15km/h. Xe hai chạy trước xe thứ nhất một giờ và nghỉ 2h. Hỏi xe 2 phải chạy với vận tốc bao nhiêu km/h thì đến B cùng lúc với xe thứ nhất???

Câu 15: Cho số thực a. Lập trình tìm số nguyên dương n nhỏ nhất thỏa mãn: 1+1/2+1/3 +.... + 1/n lớn hơn a Giúp mình câu 15 với ạ

Vì sao Trần Quốc Tuấn lại chọn sông Bạch Đằng làm nơi tiêu diệt quân giặc?

Cách vẽ ảnh của một vật tạo bởi gương phẳng bằng cách dùng định luật phản xạ ánh sáng

Tại sao nói nhịp điệu hoạt động của gió mùa có ảnh hưởng rất lớn đến nhịp điệu sản xuất và sinh hoạt của nhân dân trong khu vực Nam Á

Giúp mìmh bài kiểm tra này với ạ. Thanks

Tim tap xac dinh cua ham so sau y=1+x2 -3√x+1

Viết về nghề nghiệp tương lai của bạn bằng tiếng anh , ngắn gọn nhất . Có dịch nghĩa . Chỉ em với ạ mọi người ơi , mai em thi tiếng anh nói rồi ạ 😥

Lập dàn ý: Hãy viết bài văn thuyết minh, giới thiệu về nhà văn Nam Cao và giá trị truyện ngắn "Lão Hạc" P/s: Lập dàn ý chi tiết giúp mik nha (Lưu ý: không chép mạng nha, report đó, em tinh lắm)

Cho số thực a lập trình tìm số nguyên dương n nhỏ nhất thỏa mãn 1+1/2+1/3+...+1/n>a

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến