Sắp xếp các câu lệnh sau đây để được một chương trình hoàn chỉnh

Mn giúp mình với ạ mình đg cần gấp
----- Nội dung dịch tự động từ ảnh -----
VD2: 1. Sắp xếp các câu lệnh sau đây để được
một chương trình con hoàn chinh.
2.Viết chương trình tính tổng các lũy.
thừa: a + b5 + c8 với a, b, c nhấp từ bàn
phím Trong đó sử dụng chương trình con này
[1] Begin
[2] Luythua:=S;
[3] Function Luythua(x:real: k:integer): real;
[4] For j:=1 to k do S:=S*x;
[5] End;
[6] Var S:real; j:integer;
[7] S:=1.0;