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.
Tính tổng 2 số nguyên X và Y,trong đó X=5; Y nhập từ bàn phím
đề bài x=5, y nhập từ bàn phímcó thể làm như sau:
var s,x,y:integer;
begin
assign(input,'vd.inp');reset(input);
assign(output,'vd.out');rewrite(output);
readln(x,y);
s:=x+y;
writeln('ket qua la',s:2);
end.
khi nhập xong bạn phải nhấp tổng hợp Ctrl+F9 để kiểm tra đúng sai đưa vạch nhấp nháy đến dòng chữ vd.inp và nhấp Ctrl+Enter để nhập số
*Khi bạn nhập giá trị của x,y cần viết hai số cách xa nhau tốt nhất là bạn nhập xong số nguyên x thì nhấp Enter rồi viết số nguyên y.Ví dụ nhé:
2
3
sau đó bạn nháy F2 để lưu bạn nháy vào [] khung nho bên trái ứng với tay trái của bạn đó(đó là nút thoát khung ở đây là khung nhận)
và đưa vạch nhấp nháy đến dòng chữ vd.out và nhấp Ctrl+Enter để xem kết quả ví dụ:
nó ra dòng chữ:ket qua la
thế là bạn đã làm xong rồi nhưng có điều cách làm trên là của Free Pascal đó,Pascal mới làm dễ hơn đó!
mình chả hiểu bạn làm gì =.= :r10var x:integer;
begin
assign(input,'vd1.inp');reset(input);
assign(output,'vd1.out');rewrite(output);
read(x);
writeln('so nguyen x la',x);
end.
bạn muốn làm bạn vs mình ak? Hôm qua cô mới bày cách làm bài này=.= thật sự là k hề giống lun á nhất là cái chữ assign của bạn đó :r50 z thui nka =.= ( à mình tên là vy ) hân hạnh đc gặp.À đúng rồi, cũng muốn làm bạn với bạn lắm, Bạn tên thật là gì vậy ?,Còn tớ tên Khải nên tiếng anh đọc bị tui bạn trọc quài à (Khai) không biết vì sao ba mẹ đặt như vậy nữa;
tớ nói cụ thễ về mình luôn:
tên mình Phúc Khải(tên thật)
tuổi :13
học lớp 8
trường THCS Phú Túc
cao 1m68
Tớ rất muốn làm bạn với bạn , còn bạn thấy thế nào?
ok mà mình k bt giải đc hay k ak =.= :r30à có phải của bạn là turbo pascal đúng không? hèn gì khác là phải rồi! mình là Free Pascal nên khác nhau về cách nhập rồi!
à quên cũng hân hạnh làm quen với bạn!có gì khó bạn có thể hỏi tớ! có gì khó mình sẽ hỏi bạn nha!được không
đó k phải Tiếng Việt chứ tiếng gì?bạn viết tiếng Việt giùm mình đi mình hổng biết bạn viết gì cảr106
Người ta không biết cái cơ bản thì chỉ cho người ta cái cơ bản giùm. Giải theo kiểu này ai hiểu. Giải theo kiểu nhập từ bàn phím đó (Người ta đã nói rõ rồi) .có thể làm như sau:
var s,x,y:integer;
begin
assign(input,'vd.inp');reset(input);
assign(output,'vd.out');rewrite(output);
readln(x,y);
s:=x+y;
writeln('ket qua la',s:2);
end.
khi nhập xong bạn phải nhấp tổng hợp Ctrl+F9 để kiểm tra đúng sai đưa vạch nhấp nháy đến dòng chữ vd.inp và nhấp Ctrl+Enter để nhập số
*Khi bạn nhập giá trị của x,y cần viết hai số cách xa nhau tốt nhất là bạn nhập xong số nguyên x thì nhấp Enter rồi viết số nguyên y.Ví dụ nhé:
2
3
sau đó bạn nháy F2 để lưu bạn nháy vào [] khung nho bên trái ứng với tay trái của bạn đó(đó là nút thoát khung ở đây là khung nhận)
và đưa vạch nhấp nháy đến dòng chữ vd.out và nhấp Ctrl+Enter để xem kết quả ví dụ:
nó ra dòng chữ:ket qua la
thế là bạn đã làm xong rồi nhưng có điều cách làm trên là của Free Pascal đó,Pascal mới làm dễ hơn đó!
Mà bộ lên diễn đàn để làm quen à.Tính tổng 2 số nguyên X và Y,trong đó X=5; Y nhập từ bàn phím
y:integer chứ bạnNgười ta không biết cái cơ bản thì chỉ cho người ta cái cơ bản giùm. Giải theo kiểu này ai hiểu. Giải theo kiểu nhập từ bàn phím đó (Người ta đã nói rõ rồi) .
Mà bộ lên diễn đàn để làm quen à.
Code nè:
program Tinh_Tong;
uses crt;
var y:longint;
BEGIN
clrscr;
write('Nhap y=');
readln(y);
writeln('Tong cua x va y=',5+y);
readln;
END.
y:integer chứ bạn
Mà bộ thích lên đây bắt bẻ mình hay gì? Trả thù vụ lần trước hả?y:integer chứ bạn