نقاش المستخدم:Baha'a
مرحبا بكم في المعرفة موسوعتكم الحرة. معًا نبني ونجمع المحتوى العربي!للتأكد من طلب التسجيل في المعرفة ترسل المعرفة رسالة إلى بريدكم الإلكتروني (تأكد أن بريدك لم يضعها في ملف الرسائل غير المطلوبة Junk Mail). رد على تلك الرسالة بالنقر على الرابط فيها لكي تستطيع تحرير المقالات. نتمنى لكم مشاركة طيبة. وهاهي بعض الوصلات التي قد تكون مفيدة لك:
أرجوا ألا تترددوا بطرح الأسئلة عند الحاجة، استعملوا صفحات النقاش لذلك. ولا تنسوا التوقيع بعد ترك رسالتكم بكتابة ~~~~. --نايل الشافعي 15:53، 30 أبريل 2010 (تعم) مرحباً بك أخي بهاءسررت بوجودك معنا على المعرفة، مرحباً بك، وننتظر الكتابات المميزة لشخصك المميز بشار الجمال 13:21، 14 أغسطس 2010 (تعم) شكراً أستاذ بشارشكراً لك أستاذي الفاضل على الترحيب الذي أسعدني. وأنا فعلاً سعيد بالعمل معكم على هذا الصرح الشامخ. بهاء
اهلا بهاء... انت تساعدنا على اعادة النظر في الطريقة الافضل للتدريب العملي على الويكي.--ندى البني 14:33، 14 أغسطس 2010 (تعم) شكراً أستاذة ندى أهلا بهاءأهلا بهاء مقالة قائمة الموضوعات الأساسية في علم الحاسوب مازالت مسودة، لأنه لم يتسنى لي مراجعتها بعد. ما رأيك أن تبدأ بالعمل عليها، وترجمة بعض فقراتها. وسأمر عليها كل فترة لأرى التغييرات الحاصلة. وشكرا للتنبيه ّّّإيمان دلعين 17:49، 15 أغسطس 2010 (تعم) الموسوعة والعبر اختصاصهناك سؤالان أريد أن أبدأ بهما: كيف تبدأ فكرة بناء نظام ذكي؟ هل المعلومات في الموسعة حقاً سطحية؟ باعتقادي حتى نبدأ في بناء نظام ذكي نحتاج أولاً إلى فكرة والفكرة يمكن أن تأتي من الحياة الواقعية, كحل مشكلة واقعية، مساعدة المكفوفين على القراءة مثلاً. مرة قالت إحدى زميلاتنا أنها كانت تبحث عن موضوع بعنوان (الخيال العلمي الكمومي)، أولاً ماذا يعني الخيال العلمي الكمومي؟ يمكن أن يعني الخيال العلمي الناتج عن ميكانيك الكم، كأن تتخيل إمكانية صناعة روبوتات معقدة لا ترى بالعين المجردة وما إلى ذلك ولكنها عندما وجدت مقالة باللغة العربية تفاجأت بمدى ضخامتها وغناها ولكن المقالة كانت طويلة جداً ومليئة بالأفكار والمصطلحات الفيزيائية المعقدة التي لم تستطع فهمها ولكن حين فتحت الموضوع في نفسه في الموسوعة الإنجليزية كان المقال بسيطاً ومختصراً وكانت جميع المصطلحات الصعبة على شكل روابط لمقالات أخرى. ومرة سئل العالم الفيزيائي ريتشارد فينمان من قبل أحد الصحفيين بعد أن نال جائزة نوبل في الفيزياء: "هل يمكنك أن تخبرنا بجملة واحدة يفهمها العامة ما هو البحث الذي نلت عليه جائزة نوبل" فأجاب: "هكذا بحث يمكن تلخيصه بجملة واحدة يفهمها العامة لا يستحق جائزة نوبل" فهل تتصور ماذا ستكون لغة مقالة تشرح بحث فينمان في موسوعة وبالمناسبة أعتقد أن عنوان البحث كان مخططات فاينمان في الإلكتروديناميك الكمومي. مهمة الموسوعة هي أن تشرح المصطلحات، ولكن أي مصطلحات، يمكن أن نقول كل المصطلحات الممكنة، وهل تتخيل كم يمكن أن تكون المصطلحات دقيقة وماذا يمكن أن يستوجب شرحها. إذاً حين تريد أن تبني نظاماً معلوماتياً فإن الموسوعة يمكنها أن تدلك على المواضيع التي يجب أن تفهمها في ذلك العلم بالتحديد ويمكنها أن تشرح لك جميع مفرداتها التي تستعصي عليك. وبالنسبة لفكرة تقديم ما يمكن للذكاء الصنعي أن يفعل: فأعتقد أنها فكرة غير مجدية لأنه من المفروض أن يستطيع فعل أي شيء وربما يتطور الذكاء الصنعي أثناء محاولة فعل شيء لايمكنه فعله حالياً. تجريب تنسيق كودprogram eighthhomework;
const
d:300;
type
matrix= array[1..d,1..d] of integer;
mlengh= 1..d;
var
numbers:matrix;
n,m,res:integer;
i,j:mlengh;
typematrix:boolean;
function
symetry(a:matrix;n,m:integer):boolean;
var
i,j:mlengh;
symetric:boolean;
begin
i:=1;
j:=2;
while (symetric) do
if (a[i,j]=a[j,i])then
if (j=n) then
i:=i+1;
j:=j+1;
else
symetric:=false;
if (symetric) then
symetry:=true;
else
symetry:=false;
end;
{-----------------------symetry of matrix---------------------------}
maxunsyme(a:matrix;n,m:mlengh):integer;
var
i,j:mlengh;
begin
max:integer;
max:=a[1,1];
for i:1 to n do
for j:=2 to m do
if (a[i,j]>max) do
max:=a[i,j];
maxunsyme:=max;
end;
{-----------------------max unsymetric matrix-----------------------}
procedure
maxsyme(a:matrix;n:integer;var max:integer);
var
i,j:integer;
max:=a[1,1];
begin
for i:1 to n do
for j:=2 to n do
if (a[i,j]>max)then
max:=a[i,j];
end;
{-----------------------max symetric matrix-------------------------}
begin
writeln('please enter number of lines and number of colums');
readln(n,m);
writeln('please fill the matrix');
for i:=1 to n do
for j:=1 to m do
begin
wrtie('A[',i,',',j,']');
readln(numbers[i,j]);
end;
typematrix:=symetry(numbers,n,m);
if (typematrix) then
maxsyme(numbers,n,res);
else
res:=maxunsyme(numbers,n,m);
writeln('the begist number is ',res);
end.
الترجمة الآليةأنا سعيد بالتواصل معك يا بهاء. وبرغبتك في العمل على الترجمة الآلية. افتح حساب على سكايب وخلينا نتكلم. --نايل الشافعي 08:57، 23 سبتمبر 2010 (تعم) |