Dùng câu lệnh for-do

Bài 1: S=50!=1*2*3*4*5*6*7*............*50

Bài 2: T=3+6+9+12+......+90

Bài 3: S=4+8+12+....+80

Em thank trước nhé!
Ai rành về lập trình pascal giúp em viết vài lập trình bài toán với? YH5BAEAAAAALAAAAAABAAEAAAIBRAA7