منظورم این بود که میشه یه چیز دیگه هم نوشت ؟
دومی و سومی ساده هستن
بذارید من مثال بنویسم :

برنامه ای که 10 عدد صحیح را بگیرد و در آرایه ها ذخیره کند . سپس تعداد اعداد زوج را نمایش دهد !

روال نوشتن برنامه به این شکل هست :
کد:
program t1;
var
i,m:integer;
no:array[1..10] of integer;
begin
writeln ('please enter your numbers :')
for i:= 1 to 10 do
readln (no [i] mod 2=0 then
m:=m+1;
writeln (' teedAde aadAde zooj =')
end.
در اینجا وقتی ورودی ها گرفته میشن ، در آرایه ها ذخیره میشن
مثلا :[no[1 میشه عدد اول و بعد فراخوانی میشه و توی کارهای بعدی استفاده میشه

راستش امتحان دارم و نمیرسم بشینم بنویسم
اگه وقت هست بگید ، فردا صبح مینویسم