Viết chương trình cho bài toán: Một người gửi tiết kiệm tại 1 ngân hàng với số tiền ban đầu là 100 triệu. Biết lãi suất ngân hàng là 0,5%. Hỏi sau 12

0 bình luận về “Viết chương trình cho bài toán: Một người gửi tiết kiệm tại 1 ngân hàng với số tiền ban đầu là 100 triệu. Biết lãi suất ngân hàng là 0,5%. Hỏi sau 12”

1. var n,pt:real;

         i:byte;

   begin

    n:=100 000 000;

    for i:=1 to 12 do begin

      pt:+n/100*0.5;

      n:=n+pt;

   end;

   writeln(‘so tien hien co la:’,n:15:0);

   readln;

   end.

   Bình luận

2. uses crt;
   var s,a,b:longint;
   begin
   clrscr;
      write(‘a,b=’);readln(a,b);
      s:=a*b;
      writeln(s);
   readln
   end.

   Bình luận