K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
27 tháng 12 2020
uses crt;
var tien:real;
begin
clrscr;
repeat
write('Nhap so tien:'); readln(tien);
until tien>0;
if tien>=100000 then writeln(tien*70/100:4:2)
else writeln(tien*90/10:4:2);
readln;
end.
28 tháng 12 2020
Dạ cho mình hỏi chỗ này xíu, đoạn "(tien*70/100:4:2)" có chữ 4:2 nghĩa là gì ạ?
CX
23 tháng 11 2021
uses crt;
var tien:real;
begin
clrscr;
repeat
write('Nhap so tien:'); readln(tien);
until tien>0;
if tien>=100000 then writeln(tien*70/100:4:2)
else writeln(tien*90/10:4:2);
readln;
end.
KV
18 tháng 12 2020
T = 100 nghìn thì không tính được số tiền phải trả ở cả 2 trường hợp đâu em!
Xem lại đề đi!
Read(a) {a la so tien khach mua} ;
T := a;
If T\(\ge\)100000 then T := 90%T else T:= 95%T;
Writeln('So tien phai tra la', T)
Sao T lại bằng là 90% và 95%. Đề yêu cầu số tiền phải trả là bao nhiêu mà