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

2 câu trả lời

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.

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.

Câu hỏi trong lớp Xem thêm