Viết chương trình nhập vào số x thực từ bàn phím. gán giá trị y là 10.5. Xuất ra màn hình tích x*y

0 bình luận về “Viết chương trình nhập vào số x thực từ bàn phím. gán giá trị y là 10.5. Xuất ra màn hình tích x*y”

1. uses crt;
   var x,y: real;
   begin
   clrscr;
    write(‘Nhap x: ‘); readln(x);
    y:=10.5;
    writeln(‘x*y=’,x*y:6:2);
    readln;
   end.

   Bình luận

2. program oken;
   uses crt;
   var x,y: real;
   begin
           clrscr;
           write(‘nhap x: ‘); readln(x);
           y:=10.5;
           writeln(‘Tich cua x va y: ‘,x*y:0:3);
           readln;
   end.

   Bình luận