حل اسئلة دورات برمجة 2

تسجيل/دخول

حل اسئلة دورات برمجة 2

wazzz

أرسل من قبل wazzz في الخميس, 2008/06/12 - 4:49pm.

تاريخ التسجيل: 2005-11-29
مشاركات: 934

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الثانية

هدول حليتهم ارجو انو يكون حلي صح

2002.7.18
السؤال الأول :

Unit t1;
interface
Type
Re=record 
Ave:real;
Score,match,num:integer;
Name:string;
End;
Fi:file of re;
Var
R:re;
F:fi;	
T:text;

Procedure p1 (var f:fi;  t:text );
procedure p2 
procedure p3 (i:integer;var f:fi);

Implementation 
Procedure p1 (var f:fi;  t:text );
Begin
Reset(t)
Rewrite(f);
While not eof(t) do
begin
Readln(t,ave,score,match,name,num);
r.ave:=ave; r.score:=score; r.match:=match;
r.name:=name; r.num:=num;
write(f,r);
end;
close(f);
close(t);
end;

procedure p2;
begin
writeln(‘Good team’);
end;

procedure p3 (i:integer;var f:fi);       { I الموقع المحدد }
var j:integer;			begin
j:=1;
while j<I do {begin}
read(f,r);      {end while }
{when i:=j}
Read(f,r);
Writeln(r.ave,r.score,r.match,r.name,r.num);
If r.score >10 then
P2;
End;

Begin {main unit }
Assign(t,’c:\info.txt);
Assign (f,’c:\in.bin);

End.

السؤال التاني :
يفترض السؤال انه تم نقل العناصر (السجلات )من الملف الى سلسة مترابطة ولا يهمنا كيف حصل ذلك المهم انو حصل
1:بنية المعطيات هي سجل يحوي معلومات الفريق

2Procedure print (p:p-r{pointer);
begin
P:=l-s;
While p<>nil do   begin
Write(p^.num,p^.name,p^.match,p^.score,p^.ave);
P:=p^.next;     end;
End;

Procedure del-first(var p:p-r);
Var temp:p-r    (pointer for the damn record )
Begin
New(temp);
Temp:=l-s;
l-s:=l-s^.next;
dispose(temp);
end;



End;

السؤال الثالث نفس الكتاب ببحث الغراف
السؤال الرابع حتى عندو النص الكامل لانو مو واضح عندي

I'll code Pascal codes for food and shelter

دخول أو تسجيل لإرسال التعليقات | قراءة: 577

wazzz	الجمعة, 2008/06/13 - 2:08pm
تاريخ التسجيل: 2005-11-29 مشاركات: 934 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	........... I'll code Pascal codes for food and shelter
	دخول أو تسجيل لإرسال التعليقات

wazzz	الجمعة, 2008/06/13 - 2:08pm
تاريخ التسجيل: 2005-11-29 مشاركات: 934 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	............ I'll code Pascal codes for food and shelter
	دخول أو تسجيل لإرسال التعليقات

wazzz	الجمعة, 2008/06/13 - 2:09pm
تاريخ التسجيل: 2005-11-29 مشاركات: 934 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	......... I'll code Pascal codes for food and shelter
	دخول أو تسجيل لإرسال التعليقات

wazzz	الخميس, 2008/06/12 - 4:52pm
تاريخ التسجيل: 2005-11-29 مشاركات: 934 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	طبعا الفكرة على الورق كانت تزبط ما جربتها على باسكال وحطيت رؤوس اقلام منشان السرعة I'll code Pascal codes for food and shelter
	دخول أو تسجيل لإرسال التعليقات

wazzz	الجمعة, 2008/06/13 - 2:09pm
تاريخ التسجيل: 2005-11-29 مشاركات: 934 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	.............. I'll code Pascal codes for food and shelter
	دخول أو تسجيل لإرسال التعليقات

en.karam1989	الخميس, 2008/06/12 - 7:58pm
عضو فعال تاريخ التسجيل: 2007-03-24 مشاركات: 2146 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	عدل ردودك وضيف هي التعليمة قبل ما تبلش بالكود < div align=left dir=ltr > طبعا بعد ما تشيل المسافة قبل الـ Div 3D Max From The Begining طعنة العدو تدمي الجسد وطعنة الصديق تدمي القلب
	دخول أو تسجيل لإرسال التعليقات

foaad

الخميس, 2008/06/12 - 8:21pm

مدير

تاريخ التسجيل: 2005-07-15
مشاركات: 2975

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الخامسة
الاختصاص: هندسة برمجيات

كتب en.karam1989:

عدل ردودك وضيف هي التعليمة قبل ما تبلش بالكود
< div align=left dir=ltr >
طبعا بعد ما تشيل المسافة قبل الـ Div Smile

وكمان ممكن استعمال [ Code ] يعني:

< div dir=ltr >
[ code ]
Code Goes Here...
[ /code ]
< /div >

دخول أو تسجيل لإرسال التعليقات

wazzz	الجمعة, 2008/06/13 - 2:10pm
تاريخ التسجيل: 2005-11-29 مشاركات: 934 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	.............. I'll code Pascal codes for food and shelter
	دخول أو تسجيل لإرسال التعليقات

wazzz	الجمعة, 2008/06/13 - 2:12pm
تاريخ التسجيل: 2005-11-29 مشاركات: 934 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	......... I'll code Pascal codes for food and shelter
	دخول أو تسجيل لإرسال التعليقات

wazzz	الجمعة, 2008/06/13 - 2:13pm
تاريخ التسجيل: 2005-11-29 مشاركات: 934 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	.............. I'll code Pascal codes for food and shelter
	دخول أو تسجيل لإرسال التعليقات

wazzz	الجمعة, 2008/06/13 - 9:59am
تاريخ التسجيل: 2005-11-29 مشاركات: 934 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	لازم غير اسم الموضوع وحطو مونولوج داخلي I'll code Pascal codes for food and shelter
	دخول أو تسجيل لإرسال التعليقات

farah online

الجمعة, 2008/06/13 - 10:28am

تاريخ التسجيل: 2008-01-04
مشاركات: 394

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الأولى

كتب wazzz:

لازم غير اسم الموضوع وحطو مونولوج داخلي

وسيم شو رأيك تاخد نفس ....
انبارح كنا آخدينو راحة ....
بعد شوي منشاركك ....
ما شاء الله عليك إيمتا لحقت كل هدول ..؟؟؟

دخول أو تسجيل لإرسال التعليقات

wazzz

الجمعة, 2008/06/13 - 11:18am

تاريخ التسجيل: 2005-11-29
مشاركات: 934

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الثانية

كتب farah online:

كتب wazzz:

لازم غير اسم الموضوع وحطو مونولوج داخلي

وسيم شو رأيك تاخد نفس ....
انبارح كنا آخدينو راحة ....
بعد شوي منشاركك ....
ما شاء الله عليك إيمتا لحقت كل هدول ..؟؟؟

والله يا فرح وقت الدارات انتو عم بتدرسو دارات وانا برمجة (:

I'll code Pascal codes for food and shelter

دخول أو تسجيل لإرسال التعليقات

I Does	الجمعة, 2008/06/13 - 2:09pm
تاريخ التسجيل: 2008-05-29 مشاركات: 305 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	وسيم الله يعطيك العافية طول ما الجاجة حافية....... لو بتحط شرح بسيط ما بكون أحسن؟؟؟؟ Sign by Danasoft - Myspace Layouts and Signs
	دخول أو تسجيل لإرسال التعليقات

cornelia

الجمعة, 2008/06/13 - 2:17pm

تاريخ التسجيل: 2008-01-15
مشاركات: 76

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الثانية

سلاما

وسيم شكرا لانك فتحت الموضوع بس عنجد متل ما قالت فرح نحنا مبارحة كان بريك

بصراحة انا لسا ما بلشت باسئلة الدورات لساتني معلقة عند الغراف ........!!!

حدا فهمانو شي يشرح عنوو لو فكرة بسيطة !!

دخول أو تسجيل لإرسال التعليقات

farah online

الجمعة, 2008/06/13 - 2:45pm

تاريخ التسجيل: 2008-01-04
مشاركات: 394

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الأولى

كتب cornelia:

سلاما وسيم شكرا لانك فتحت الموضوع بس عنجد متل ما قالت فرح نحنا مبارحة كان بريك بصراحة انا لسا ما بلشت باسئلة الدورات لساتني معلقة عند الغراف ........!!! حدا فهمانو شي يشرح عنوو لو فكرة بسيطة !!

الإجرائية toto

.....

بالبداية ما بعرف يمكن في خطأ مطبعي بهي الإجرائية بالمحاضرة بال sy و لازم تكون

: sy=(vyb-vyt)/(wyt-wyb)

شغلة هي الإجرائية أعطيها إحداثيات النقطة على الورق تعطيني إحداثيات النقطة على الشاشة ....
طيب و ليش هي الإحداثيات متغيرة .. يعني على الورق مو متل على الشاشة .؟؟؟
لأنو الرسمة تبعنا اللي على الورق ممكن تكون بأي مكان بالنسبة للمحاور الإحداثية و بأي ربع منون .... بس المحاور تبع الشاشة موجود بالأصل و ما منقدر نغيرها حيث أنى مبدأ الإحداثيات يكون في الزاوية العليا اليسارية من الشاشة ...
يعني مجرد عمليات تكبير و تصغير أو سحب محاور اللي كنا نشتغل فيون بالأشعة بزمناتنا بالحادي عشر على ما أذكر ( وقت ما كنا ندرس ) ...

هلأ نحنا عم ننقل الرسمة من مستطيل (على الورق ) بأبعاد معينة لمستطيل تاني (على الشاشة ) كمان ألو أبعاد معينة ..
طيب كيف بدنا نحدد المستطيل ...؟؟؟
بتحديد إحداثيات نقطتي زاويتين متقابلتين فيه ... و هدول هنن النقط اللي عم ندخلون للإجرائية من فوق ...
اقرون و قارنون مع الرسمة اللي بالصفحة 4 من المحاضرة بتعرفو كل وحدة شو هية ...

و بلكي نحنا بدنا نغير قياس الرسمة وقت ننقلها على الشاشة ... كيف ..؟؟؟
في شي أسمو معامل التكبير أو التصغير و طبعاً بيختلف بين السينات و العينات (بشكل عام) ...
كيف منحسبو ..؟؟
مشان معامل التكبير على السينات مناخد طول المستطيل على الشاشة و منقسمو على طول المستطيل على الورق ...
و طول المستطيل هو متل طول أي قطعة مستقيمة تنتمي لمحور (سينات الكبيرة - سينات الصغيرة )
و مشان المعامل تبع العينات مناخد عرض المستطيل ...

منبلش من عند ال x بالأول بدنا نطرح منها wxb ليش هالحركة ...؟؟؟ .... مشان نسحب مبدأ محور السينات (أفقياً) نحو اليسار حتى تصير أول تدريجة بالمحور هية الصفر و شوف شو إحداثي x الجديد بعد السحب ....
يعني كان عنا محور مثلاً مدرج من -10 لل 10 نفسو ما غيرت عدد التدريجات (بس بهي الحركة )و لا موقع النقطة بس غيرت التدريجات من 0 لل 20 و شفت شو الرقم اللي صارت عندو النقطة على هاد المحور ...
يعني لزقو النقطة و اسحبو المحور و شوفو شو الإحداثيات الجديدة بعد السحب .....

بعدين صرت بدي كبر الرسمة لأنو الرسمة اللي عندي أبعادها صغيرة و الرسمة اللي على الشاشة أبعادها أكبر (أو بالعكس في بعض الحالات ) مشان هيك بضربها ب xs اللي هو معامل التكبير على محور السينات ...

هلأ صارت الرسمة عندي جاهزة و فيني إلزقها على الشاشة ... بس بلكي أنا ما بدي الرسمة تبلش من أول الشاشة شو بعمل ... بضيف للناتج إحداثيات النقطة اللي بدي بلش منها ....

و نفس الشي بالنسبة للعينات مع فرق بسيط ... هو أنو نحنا هون بدنا نقلب المحور كمان ...لازم يصير من فوق لتحت ... مشان هيك طرحنا vyb من ال getmaxy

آسفة على الإطالة .... بس بهدف تبسيط الفكرة ...
هاد اللي فهمتو بس أي خطأ بحكيي يا ريت تنبهوني ...

دخول أو تسجيل لإرسال التعليقات

Mu_Nizar	الجمعة, 2008/06/13 - 2:48pm
تاريخ التسجيل: 2008-06-04 مشاركات: 67 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	الله يعطيكي العافية و يقويكي ............... ما شاء الله.......عم تلحقي للمنتدين.....خزيت العين صنائع المعروف تقي مصارع السؤء
	دخول أو تسجيل لإرسال التعليقات

cornelia	الجمعة, 2008/06/13 - 3:05pm
تاريخ التسجيل: 2008-01-15 مشاركات: 76 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	الله يسلم هالايدين فرح و شكرا كتير الك و انشالله ترفعيها بمعدل عالي
	دخول أو تسجيل لإرسال التعليقات

farah online

الجمعة, 2008/06/13 - 3:13pm

تاريخ التسجيل: 2008-01-04
مشاركات: 394

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الأولى

الله يعافيكون .....و إن شاء الله كلنا منرفعها بمعدل عالي ...

عم أعمل كوبي باست للرد .... Mr. Green
بس إذا بتحبو نكمل بمكان واحد بكون أحسن ...

دخول أو تسجيل لإرسال التعليقات

vampireheart.69	الجمعة, 2008/06/13 - 4:05pm
تاريخ التسجيل: 2008-01-04 مشاركات: 152 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الأولى	هلئ بدي اسأل بالمسألة الاولي تبع دورة 18-7-2002 بال header تبع الاجرائية p1 مو لازم نحط var قبل الt:text ؟؟؟ وكمان بالاجرائية p3 ما فينا نعمل حلقة for j:=1 to i do read(f,r)مشان ننزل لعند الrecord يلي بدنا ياه؟؟؟ ولو كان الملف نصي وبدنا ننزل للسطر التالت مثلا منقول نفس الشي ولا بتكون بدل ال i هي i-1 وبدل الread(f,r) منقول readln(f) وبنفس السؤال مو لازم تكون الassign بالبرنامج مو بالوحدة ولا شلون ؟ I'm just like you, just not a fool I'm just like you, just not as cool
	دخول أو تسجيل لإرسال التعليقات

cornelia	الجمعة, 2008/06/13 - 4:40pm
تاريخ التسجيل: 2008-01-15 مشاركات: 76 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	و انا كمان عندي سؤال ؟؟ هلا صفحة 138 من الكتاب شو هنن ix1.iy1 شو بدلو ....؟؟ و شو استفدنا منن ...!!
	دخول أو تسجيل لإرسال التعليقات

I Does

الجمعة, 2008/06/13 - 5:59pm

تاريخ التسجيل: 2008-05-29
مشاركات: 305

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الثانية

كتب cornelia:

و انا كمان عندي سؤال
؟؟
هلا صفحة 138 من الكتاب شو هنن ix1.iy1 شو بدلو ....؟؟ و شو استفدنا منن ...!!

هاد هو الـ toto الخاص بالفراشة Very Happy

و رقم 40 رقم تجريبي مشان تطلع الرسمة تمام عالشاشة و بعدين جمعنا قيم معينة داخل الـ line مشان نفس السبب........

Sign by Danasoft - Myspace Layouts and Signs

دخول أو تسجيل لإرسال التعليقات

farah online

الجمعة, 2008/06/13 - 6:32pm

تاريخ التسجيل: 2008-01-04
مشاركات: 394

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الأولى

رسم التابع ديكارتياً ...

نحنا لح نرسم التابع شقفة شقفة .... يعني بيطلع كأنو قطع مستقيمة موصلة ببعضها و بتزداد دقة الرسم كل ما صغرت القطعة و كبر عدد القطع ... أي كلما كبرنا ال n ...
بالأول لازم نحدد المجال اللي بدنا نرسم عليه التابع و هو [x0,xn]
شو هي الdx ...؟؟؟
هلأ مو نحنا بدنا نرسم التابع قطعة قطعة ... و كل قطعة إلها نقطتين بداية و نهاية .. الفرق بين سينات هدول النقطتين هو dx ....
كيف منطلعها ..؟؟؟
طول المجال تقسيم عدد القطع n
كيف منطلع طول المجال ..؟؟؟
سينات آخر نقطة xn منطرح منها سينات أول نقطة x0 ...

منجيب نقطتين مشان نحركون (x1,y1) , (x2,y2)
منأسند ل x1 أول نقطة بالمجال و ل y1 قيمة التابع عند هي النقطة ...
لأنو عينات نقطة تنتمي إلى منحني تابع هية قيمة التابع عند هي النقطة

و منأسند لـ x2 قيمة x1+dx ... لأنو x2 هية سينات النقطة تبع الطرف التاني من القطعة اللي بدنا نرسمها و اللي الفرق بين نقطتي بدايتها x1 و نهايتها x2 هو dx
و طبعاً منأسند ل y2 قيمة التابع عند x2

هلأ صارو النقط جاهزة عندي .. بس بدنا نحولون من إحداثيات الورق لإحداثيات الشاشة (بتمريرهون على إجرائية توتو )
و أخيراً صار وقت رسم هالقطعة المستقيمة ... منمرر إحداثيات نقط البداية و النهاية للتابع line و هو لحالو بيرسمها ..

بس في شغلة ما عرفت ليش هيك هون .....يا ريت اللي بيعرف يقلنا ... و هية أنو ليش ممررين للتابع line القيمتين getmaxy-y1,getmaxy-y2 ...بدل y1,y2 ... يعني نحنا قلبنا النقطة مشان تناسب محور العينات المقلوب داخل الإجرائية toto ليش لنرجع نقلبون مرة تانية ..؟؟؟

المهم بالأخير منسند x2,y2 لـ x1,y1 و منطلع لفوق بالحلقة منطلع قيم جديدة لـ x2 ,y2 متل ما عملنا قبل شوي ... و منرجع منعيد الكررة حتى ينتهي عدد القطع (n)
و هيك منكون رسمنا هالتابع الحلو ....

و توتة توتة خلصت الحتوتة .... حلوة و لا فتفوتة ..

دخول أو تسجيل لإرسال التعليقات

I Does	الجمعة, 2008/06/13 - 6:34pm
تاريخ التسجيل: 2008-05-29 مشاركات: 305 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	يا جماعة روحوا شوفوا ردود فرح بالـ ite ....حاج تعذبوها بالمشاركة مرتين.... Sign by Danasoft - Myspace Layouts and Signs
	دخول أو تسجيل لإرسال التعليقات

cornelia	الجمعة, 2008/06/13 - 6:42pm
تاريخ التسجيل: 2008-01-15 مشاركات: 76 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	بس في شغلة ما عرفت ليش هيك هون .....يا ريت اللي بيعرف يقلنا ... و هية أنو ليش ممررين للتابع line القيمتين getmaxy-y1,getmaxy-y2 ...بدل y1,y2 ... يعني نحنا قلبنا النقطة مشان تناسب محور العينات المقلوب داخل الإجرائية toto ليش لنرجع نقلبون مرة تانية " انا كمان كان عندي نفس السؤال؟؟؟؟ على كلن الله يسلم هالايدين
	دخول أو تسجيل لإرسال التعليقات

farah online

الجمعة, 2008/06/13 - 6:47pm

تاريخ التسجيل: 2008-01-04
مشاركات: 394

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الأولى

كتب I Does:

يا جماعة روحوا شوفوا ردود فرح بالـ ite ....حاج تعذبوها بالمشاركة مرتين.... Laughing

معليش مو مشكلة عذابون راحة .....
المهم ادعولي لحق ... و خصوصي أنو لسا ما درست الشجرة و الوائح المترابطة من طرفين .... بس ادعولنا ....

دخول أو تسجيل لإرسال التعليقات

I Does

الجمعة, 2008/06/13 - 6:51pm

تاريخ التسجيل: 2008-05-29
مشاركات: 305

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الثانية

كتب cornelia:

بس في شغلة ما عرفت ليش هيك هون .....يا ريت اللي بيعرف يقلنا ... و هية أنو ليش ممررين للتابع line القيمتين getmaxy-y1,getmaxy-y2 ...بدل y1,y2 ... يعني نحنا قلبنا النقطة مشان تناسب محور العينات المقلوب داخل الإجرائية toto ليش لنرجع نقلبون مرة تانية "
انا كمان كان عندي نفس السؤال؟؟؟؟
على كلن الله يسلم هالايدين

رح إعملك نسخ لجوابي بالموقع التاني:
"
هن إذا عملو هيك معناها ما قلبو المحور Y داخل ال توتو ............ارجعي شوفي و تأكدي....
نحنا بعد ما كنا نحسب قيمة النقطة على المحور Y و بعدين كنا نضربها بمعامل التكبير .....كنا نطرح من getmax هالقيمة داخل toto ....أما بهالطريقة فأجلو عملية الطرح لبعدين و حطوها بالهيدر تبع التوتو ......"
طبعاً مع حذف بالآخير تجنباً للمشاكل Very Happy

Sign by Danasoft - Myspace Layouts and Signs

دخول أو تسجيل لإرسال التعليقات

cornelia

الجمعة, 2008/06/13 - 6:56pm

تاريخ التسجيل: 2008-01-15
مشاركات: 76

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الثانية

كتب I Does:

كتب cornelia:

شكرا

دخول أو تسجيل لإرسال التعليقات

I Does	الجمعة, 2008/06/13 - 7:07pm
تاريخ التسجيل: 2008-05-29 مشاركات: 305 الجامعة: دمشق الكلية: الهندسة المعلوماتية المرحلة: السنة الثانية	شو مشان إني طالع عم قول شكراً بالرد تبعك كورنيليا ... عادي ......المهم تكون وصلت الفكرة..... Sign by Danasoft - Myspace Layouts and Signs
	دخول أو تسجيل لإرسال التعليقات

farah online

الجمعة, 2008/06/13 - 7:11pm

تاريخ التسجيل: 2008-01-04
مشاركات: 394

الجامعة: دمشق
الكلية: الهندسة المعلوماتية
المرحلة: السنة الأولى

كتب I Does:

طبعاً مع حذف بالآخير تجنباً للمشاكل Very Happy

Mr. Green

دخول أو تسجيل لإرسال التعليقات

CSC-SY

حل اسئلة دورات برمجة 2

خيارات عرض التعليقات