ai giỏi Tin học giúp mình với viết chương trình pascal: 1/gửi vào ngân hàng 1 số tiền, sau x tháng thì nhận được bao nhiêu ? 2/gửi vào ngân hàng 1 số tiền, A muốn nhận số tiền B thì cần bao nhiêu tháng. Biết lãi suất là 2%/tháng và không tính lãi gộp( tức là mỗi tháng đều lấy tiề

ppn1102.vn

2 năm trước

ai giỏi Tin học giúp mình với viết chương trình pascal: 1/gửi vào ngân hàng 1 số tiền, sau x tháng thì nhận được bao nhiêu ? 2/gửi vào ngân hàng 1 số tiền, A muốn nhận số tiền B thì cần bao nhiêu tháng. Biết lãi suất là 2%/tháng và không tính lãi gộp( tức là mỗi tháng đều lấy tiền gốc làm mốc cộng lãi)

Loga Sinh Học lớp 12

0 lượt thích 37 xem

1 trả lời

Thích Trả lời

linhngocc3hv

Đây là câu trả lời đã được xác thực

Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.

uses crt;
var n,x,i:longint; t:real;
begin
clrscr;
write('So tien, x: ');readln(n,x);
t:=n;
for i:=1 to x do t:=t+(n/100)*2;
writeln(t:0:2);
readln
end.

uses crt;
var n,x,i,b:longint; t:real;
begin
clrscr;
write('So tien, so tien b: ');readln(n,b);
t:=n;
while t<b do begin inc(i); t:=t+(n/100)*2; end;
writeln('Can ',i,' thang');
readln
end.

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

muongvang

program bai1;

uses crt;

var tien,x:longint;

t:real;

begin

clrscr;

write('Nhap so tien: '); readln(tien);

write('Nhap thang: '); readln(x);

t:=tien;

for i:=1 to x do

t:=tien*(102/100);

write('So tien nhan duoc la: ',t:2:2);

readln

end.

program bai2;

uses crt;

var tien,t,n,tien2:longint;

begin

clrscr;

write('Nhap so tien ban dau: '); readln(tien1);

write('Nhap so tien muon nhan: '); readln(tien2);

n:=0; t:=tien1;

while t<tien2 do

begin

n:=n+1;

t:=t*(102/100);

end;

write('Can ',n,' thang');

readln

end.

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

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

cmr: `1-1/2^2-1/3^2-1/4^2-....-1/2006^2>1/2006`

Vẽ anime vui đi , harybotter có trailer và sách phần 8 rồi , mong mau có phim ghê

giải mik bài này với ạ..........

1. Giải phương phương trình a. -15 -x = 0 b. 6 - 4x = 0 c. 2x - 7 = 6x + 9 d. 3x - 1 = -7x - 21

pic 1: vẽ hoa sen = app, pic 2 vẽ mặt cười bằng app

khử hoàn toÀN 48g đồng 2 oxit = khí co . thể tích khí co cần dùng (đktc) là?

Narutobaco :) Sasuketamin :D ______________ $\text{Vẽ ảnh dưới đê :3}$ P/s: Digi not tradi...OKE .-?

Một cái xe đạp trẻ em có đường kính bánh trước gấp rưỡi đường kính bánh sau.Hỏi khi bánh trước lăn 40 vòng thì bánh sau lăn được bao nhiêu vòng?

Vẽ anime vui vẻ P/s Tỉnh Hưng Yên thi vào 10 có tổng hợp :(((

Dẫn xuất điclo của một ankan x có phân tử khối là 113.X có công thức phân tử là

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