Viết CT Đổi tiền đô la(USD) 1 đô bằng 23.255.814 vnd

0 bình luận về “Viết CT Đổi tiền đô la(USD) 1 đô bằng 23.255.814 vnd”

1. program ct;

   uses crt;

   var vnd,usd:real;

   begin clrscr;

      write(‘Nhap so tien do la: ‘); readln(usd);

        vnd:=usd*23.255.814;

      write(‘Doi sang tien viet la: ‘,vnd:5:5,’ dong);

   readln;

   end.

   Học tốt!

   Bình luận

2. program Doi_DV_Tien;
   uses crt;
   var USD :integer;VND :real;
   begin
           clrscr;
           writeln(‘—————–‘);
           writeln(‘Chuong Trinh Doi Tien’);
           write(‘Hay nhap so tien(USD) cua ban: ‘);
           readln(USD);
           VND:=23255.814*USD;
           writeln(VND:10:6);
           readln
   end.
   Thế này à

   Bình luận