Pascal :những BT nguy hiểm

[binhqb12]

Mình cần các bạn giải hộ 1 số bài:
---------------------------------------------------------
1)Nhập mảng n phần tử. In ra màn hình mảng đó như sau:
a) a[1]! a[2]! a[3]!......a[n]!;
b) a[1] a[2]^2 a[3]^3.....a[n]^n;
c) Nhâp 1 số m. In ra màn hình m kí tự liên tiếp lớn nhất và nhỏ nhất;
VD; Input: n=5 ; m=2 a[1]=1 a[2]=2 a[3]=2 a[4]=2 a[5]=2
Output: a) 1 2 6 2 2
b) 1 4 8 16 32
c) 1 2 {m số nhỏ nhất trong mảng n)
2)Nhập xâu S;
a) Đếm xem trong xâu S có bao nhiêu từ;
b) In mỗi từ trên 1 dòng
----------------------------------------------------------
Thanks ai làm đc :D

[tranvovuong]

Tay này nhảm thiệt.Trò trẻ con hả bác??

[hang_vt]

1)
a) bạn vik function tính ! ùi gọi function vs các phần tử trong mảng a
b) vik function x mũ n
c) sx ùi mảng ùi in ra m phần tử đầu tiên và m phần tử cuối cùng
2)
a) kt vs điều kiện s[i-1]=' ' và s[i] <>' ' thì tăng biến đếm lên ( biến đếm là biến đếm xem có bao nhiêu từ ) . Cuối cùng bạn in ra biến đếm
b) nếu thỏa điều kiện s[i-1]=' ' và s[i] <>' ' thì bạn cho lệnh writeln ( xuống dòng )

[binhqb12]

Ồ ồ trò trẻ con thì viet bài sem bài làm đầy đủ vào :D.
Thanks hang_vt nhung mình làm đc ồi bài của mình đơn giản thui :D.
B1
a) chạy 2 vòng for i từ 1 đến n & j từ 1 đến i;
a[i]:=a[i]*j; thế là đủ hỉu
b)Cũng chạy 2 vòng for i từ 1 đến n & j từ 1 đếni

[mini_bestboy]

Nhưng BT này có gì mà nguy hiểm hả bạn ?

[luannc]

haha.ông đang học pascal ko làm được bài này nên pót lên để mọi ng làm giúp ma.lần sau nói thẳng ra thì tốt hơn đấy.

[damnguyenhuu]

Nếu bạn chưa học 12 thì bạn chưa biết công thức mũ này:
a^b <=>(pascal) exp(a*ln(b))

[bld]

quang nó biết rồi đó anh ^^

[tranvovuong]

Ồ ồ trò trẻ con thì viet bài sem bài làm đầy đủ vào :D.
Thanks hang_vt nhung mình làm đc ồi bài của mình đơn giản thui :D.
B1
a) chạy 2 vòng for i từ 1 đến n & j từ 1 đến i;
a[i]:=a[i]*j; thế là đủ hỉu
b)Cũng chạy 2 vòng for i từ 1 đến n & j từ 1 đếni

cái tựa của bác xàm quá.đây chỉ là mấy bài tập bình thường thôi có gì đâu mà đề "nguy hiểm".đọc xong tức cười quá!
Làm ơn những bài pascal đơn giản này tự ngâm cứu đi.chắc là mới học hả?thảo nào!

[jiSh@n]

Nguy hiểm quá, mình té đây :emlaugh:

[gio_huy_hoang]

Hix, nguy hiểm quá, lâu lâu có người nhắc không là ... quên pascal :D

[quangtq]

Ơ hơ, anh damnguyenhuu sai kìa.
a^b = exp(b*ln(a)).
Bouns thêm luôn
Căn bậc n của a = exp((1/n)*ln(a))
@bld: Biết thì có gì đâu. Cái này bt mà :D

[zmt264]

Nguy hiểm quá, mình té đây :emlaugh:

Mình cũng thế, sợ quá, tí chết.

[hang_vt]

có mỗi cái title e nó vik hơi quá , các bạn làm j` xỏ ghê vậy =.=! , góp ý vs e í từ từ . E í mới học pascal nên coi n~ bài này là khó , các bạn thì pro rồi . Lúc trước , ai dám nói mới học pascal đã làm đc n~ bài này =.=!
@ chủ top : lần sau e đừng để title boom tấn thế :)

[chick chick]

Mình cần các bạn giải hộ 1 số bài:
---------------------------------------------------------
1)Nhập mảng n phần tử. In ra màn hình mảng đó như sau:
a) a[1]! a[2]! a[3]!......a[n]!;
b) a[1] a[2]^2 a[3]^3.....a[n]^n;
c) Nhâp 1 số m. In ra màn hình m kí tự liên tiếp lớn nhất và nhỏ nhất;
VD; Input: n=5 ; m=2 a[1]=1 a[2]=2 a[3]=2 a[4]=2 a[5]=2
Output: a) 1 2 6 2 2
b) 1 4 8 16 32
c) 1 2 {m số nhỏ nhất trong mảng n)
2)Nhập xâu S;
a) Đếm xem trong xâu S có bao nhiêu từ;
b) In mỗi từ trên 1 dòng
----------------------------------------------------------
Thanks ai làm đc :D
bài 1 với những số lớn thì không dễ đâu.
bài 2 mà bảo nguy hiểm thì thật là quá đáng

[hitman_pr0]

Cũng làm j` đến mức mà gọi là nguy hiểm chứ. Bác có nói hơi quá đáng ko vậy ???

[hoada88]

bai vo van nay dung co post len nha! good luck