Nguyen Thi My Duyen
Hỏi từ APP VIETJACK
Viết trương trình nhập vào hai biến x,y thực. Tìm giá trị nhỏ nhất của hai số đó
Quảng cáo
1 câu trả lời 103
3 năm trước
Uses crt;
Var x, y, l: real;
Begin
Clrscr;
Write('Nhap x = '); readln(x);
Write('Nhap y = '); readln(y);
l:=x;
x:=y;
y:=l;
Writeln(x,' va ',y,' sau khi hoan doi la: ');
Writeln('x = ',x);
Writeln('y = ',y);
Readln
End.
Quảng cáo
Câu hỏi hot cùng chủ đề
Gửi báo cáo thành công!