Tin học Viết công thức

[Nha Trang quê hương]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

em hãy viết công thức nhập các số nguyên X và Y, in giá trị của X,Y ra màn hình.Sau đó hoán đổi các giá trị của X và Y rồi in ra màn hình giá trị x,y đc nhập từ bàn phím

 

[ka1412]

var x,y:integer;
begin
write('Nhap x:');readln(x);
write('Nhap y:');readln(y);
write('x=',x);
write('y=',y);
x:=x+y;
y:=x-y;
x:=x-y;
write('x=',x);
write('y=',y);
readln
end.

Có gì không hiểu bạn cứ hỏi mình nhé =)))

 

[Nha Trang quê hương]

var x,y:integer;
begin
write('Nhap x:');readln(x);
write('Nhap y:');readln(y);
write('x=',x);
write('y=',y);
x:=x+y;
y:=x-y;
x:=x-y;
write('x=',x);
write('y=',y);
readln
end.

Có gì không hiểu bạn cứ hỏi mình nhé =)))

bạn ơi, có thêm program vs uses ko

 

[Dương Nhạt Nhẽo]

bạn ơi, có thêm program vs uses ko

có

 

[ka1412]

bạn ơi, có thêm program vs uses ko

Không hay có đều được bạn ơi