tui cần tư vấn về pascal ........

[angellord91_no1]

tui rất ngu pascal nhưng trót đeo gông là đội tuyển tin nên cần nhờ
cho tui hỏi là để lập ra 1 thuật toán trong đó có dấu phẩy ở kết quả như nào (căn chỉnh két quả)

 

[hacker_IT]

Ví dụ
Ta đặt biến a:=10/3
Thì viết dấu phẩy nhanh nhất sẽ là a:y
Với x là tổng số khoảng trống để viết phần nguyên
còn y là tổng số khoảng trống để viết phần thập phân
Còn nếu bạn ko muốn làm như vậy
Thì bạn đưa a thành 1 biến chuỗi s
Thì khi a=10/3 thì s=3.3333333333333E+00
có nghĩa là 3.33333333333*10mũ0
Và bạn chỉ cần cho biến i chạy và xét thôi

 

[angellord91_no1]

làm hộ tui bài
(x^4+x^2-1)\((x^2-x+1)*2)
cho tui cảm ơn truớc nha

 

[choimuol]

Bài này dễ wá mà bạn cố gắng tự làm đi nhá.Như thế mới giỏi được bạn à.Như thế bọn con gái mới nể.

 

[hacker_IT]

Nếu bạn là ở đội tuyển Tin thật thì bài này bạn nên tự làm
Nếu ko thì việc thi đỗ được 1 cái giải sẽ khó đấy

 

[Badamgia_037]

Ông học đội tuyển kiệu gì vậy.
Nhữnh bài như thế này fair tự làm được chứ
CỐ LÊN>!

 

[Tào_Tung]

làm hộ tui bài
(x^4+x^2-1)\((x^2-x+1)*2)
cho tui cảm ơn truớc nha

\ Dấu này có ý nghĩa là gì
Bài này không làm được mà cũng bốc phét là đội tuyển

 

[caoboitapban1412]

Sạc!Ba nào có phần mền dạy pascal cơ bản+bài tập hok?
Mình mới học pascal mà khó we'

 

[Tào_Tung]

Vào trong echip kiếm cái phần mềm pascal study về mà học Lười kiếm lại lắm

 

[BlueKnife]

tui rất ngu pascal nhưng trót đeo gông là đội tuyển tin nên cần nhờ

chài con này ở đôi tuyển trường nào thế ?
(tiểu học ah ?)

 

[angellord91_no1]

ui trùi tui chỉ muốn chép cho nhanh,cái lênh writer va read cứ loạn cả lên,trường không biết bốc pháp kỉu rì mà bảo em cứ vào đi truờng năm nào cũng có giải quốc gia thấy hay hay nên vào

 

[angellord91_no1]

ồ đúng rùi ,mời chúng nó cũng không thèm vào đấy chứ . tui không bít làm sao để cho 1 số là số đối xứng đây.(4 chữ số) tính tổng thì tui bít rùi!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!help!!!!!!!!!!!!!!!!!!!!!!!!!

 

[hacker_IT]

Đây là bài tui làm thử
Bạn thử test xem thế nào

uses crt;
var n:longint;
i:integer;
s:string;
q:boolean;
begin clrscr;
write('Nhap n: '); readln(n);
str(n,s); q:=true;
for i:=0 to length(s) div 2 do
if s[i+1] <> s[length(s)-i] then
begin
write('Ko la so doi xung');
q:=false;
break;
end;
if q then writeln('La so doi xung');
readln;
end.

 

[o0o Agumon o0o]

Lúc trước có bác nào đưa cái link download pascal về, nhưng mà bây giờ lục lại em không thấy. Có ai còn nhớ không thì giúp dùm em với.

 

[Nguyen_Kain]

Lúc trước có bác nào đưa cái link download pascal về, nhưng mà bây giờ lục lại em không thấy. Có ai còn nhớ không thì giúp dùm em với.

http://forums.gamevn.com/showthread.php?t=227904

Topic này có 1 link down , theo mình link đó tương đối ổn định , có thể xài được !

 

[angellord91_no1]

à mà thầy tui bảo là 1 số chia hết cho 11 là số đối xứng làm như vậy liệu có khả quan khong

 

[hacker_IT]

Ko phải
Số chia hết cho 11 là những số mà có quy luật như này
Ví dụ
121 chia hết cho 11 thì chữ số hàng trăm + chữ số hàng đơn vị = 2
1232 chia hết cho 11 thì chữ số hàng nghìn + chữ số hàng chục = chữ số hàng trăm + chữ số hàng đơn vị
12342 chia hết cho 11 thì chữ số 1 + 3 + 2 = 2 + 4

 

[soulevil9]

sao ở đây toàn hỏi về C và Pascal thía nhỉ

 

[Nguyen_Kain]

sao ở đây toàn hỏi về C và Pascal thía nhỉ

Vậy bạn muốn bàn tán về ngôn ngữ gì đây ? Dù gì đây cũng là box lập trình mà !

nếu bạn có ngôn ngữ nào mới , hoặc muốn giới thiệu kinh nghiệm , thfi mình xin hoan nghênh ! :

 

[hacker_IT]

Pascal và C là ngôn ngữ chủ đạo của học sinh
Ko nói về cái đó thì nói về cái chi
Kain lập hẳn box thuật toán cho anh em vào đóng góp ý kiến nhỉ