Bài 6. Câu lệnh điều kiện

hoàng thiên

viết chương trình tính tiền gửi ngân hàng với số tiền gửi,lãi suất,số tháng nhập từ bàn phím.Dự kiến các biến và chạy chương trình

Luân Đào
25 tháng 2 2019 lúc 11:20
program tinhtien; uses crt; var tiengui, laisuat: real; n: integer; begin clrscr; write(' Nhap so tien gui '); read(tiengui); write(' Nhap lai suat vao '); read(laisuat); write(' So thang gui vao la '); read(n); For 1 to n do tiengui:=tiengui+tiengui/100*laisuat; write(' So tien duoc nhan la', tiengui); readln end.
Bình luận (0)
Luân Đào
25 tháng 2 2019 lúc 11:21
program tinhtien; uses crt; var tiengui, laisuat: real; n: integer; begin clrscr; write(' Nhap so tien gui '); read(tiengui); write(' Nhap lai suat vao '); read(laisuat); write(' So thang gui vao la '); read(n); For 1 to n do tiengui:=tiengui+tiengui/100*laisuat; write(' So tien duoc nhan la', tiengui); readln end.
Bình luận (0)
JaKi Blue
8 tháng 3 2019 lúc 19:48

Mk chuyển các biến cho nó ngắn gọn:

tiengui:tg,laisuat:ls.

program tinhtien;

uses crt;

var tiengui, laisuat: real;

n: integer;

BEGIN

clrscr;

write(' Nhap so tien gui '); readln(tg);

write(' Nhap lai suat vao '); readln(ls);

write(' So thang gui vao la '); read(n);

For 1 to n do tiengui:=tiengui+tiengui/100*laisuat;

write(' So tien duoc nhan la', tiengui);

readln;

END.

Bình luận (0)

Các câu hỏi tương tự
hoàng thiên
Xem chi tiết
hoàng thiên
Xem chi tiết
04-Nguyễn Quốc Đại-8a3
Xem chi tiết
Sang Nghiem
Xem chi tiết
Nguyễn Thị Bích Trâm
Xem chi tiết
Không Tên
Xem chi tiết
nguyễn ngọc thúy vi
Xem chi tiết
Duy Thanh Bùi
Xem chi tiết
Duy Thanh Bùi
Xem chi tiết