Ahmed Hatem Ahmed

Ahmed Hatem Ahmed

عضوية الشرف
التسجيل
12/6/15
المشاركات
1,412
الإعجابات
1,629
الجنس
Male
#1
السؤال السادس من أسئلة الخوارزميات يتعلق بطبع الإشكال كيف يمكن طبع
هذا الشكل الموجود بالصورة :1016:


بالتوفيق للجميع .
 

سعد الدين

سعد الدين

المسؤول الفني
التسجيل
18/3/03
المشاركات
44,835
الإعجابات
15,825
الإقامة
Türkiye
#2
ماشاء عنك مشرفنا العزيز مواضيع بغاية الفائدة والمتعة

الله ينور عليك وان شاء الله يستفيدوا الاخوة الاعضاء من الموضوع والتفاعل الجيد به.
 

ثامر أبو بلقيس

عضو مشارك
التسجيل
27/3/17
المشاركات
32
الإعجابات
4
#3
PHP:
k="\r\n".."===========".."\r\n"
table1=""
for i =1,6 do
rn = String.Repeat("  ",(12-(i*2))/2)
g1= String.Repeat("*",(i*1))
table1=table1.."\r\n"..rn..g1.." | "..g1..rn
end
Dialog.Message("Notice",table1..k..string.reverse (table1));
أو
PHP:
Input.SetProperties("Input1", {Alignment=1,Multiline=true});
x,y,v = 1,6,1
for n =1,2 do
for i =x,y,v do
rn = String.Repeat(" ",(12-(i*2)))
g1= String.Repeat("*",(i*2))
Input.SetText("Input1",Input.GetText("Input1")..rn..g1..rn.."\r\n" );
end;x,y,v = 6,1,-1;end
 

ثامر أبو بلقيس

عضو مشارك
التسجيل
27/3/17
المشاركات
32
الإعجابات
4
#4
ماشاء عنك مشرفنا العزيز مواضيع بغاية الفائدة والمتعة

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

عبد الهادي بهاب

VIP
التسجيل
23/1/14
المشاركات
716
الإعجابات
427
#5
ماشاء الله استاذ ثامر
للاسف

 
Ahmed Hatem Ahmed

Ahmed Hatem Ahmed

عضوية الشرف
التسجيل
12/6/15
المشاركات
1,412
الإعجابات
1,629
الجنس
Male
#6
PHP:
k="\r\n".."===========".."\r\n"
table1=""
for i =1,6 do
rn = String.Repeat("  ",(12-(i*2))/2)
g1= String.Repeat("*",(i*1))
table1=table1.."\r\n"..rn..g1.." | "..g1..rn
end
Dialog.Message("Notice",table1..k..string.reverse (table1));
أو
PHP:
Input.SetProperties("Input1", {Alignment=1,Multiline=true});
x,y,v = 1,6,1
for n =1,2 do
for i =x,y,v do
rn = String.Repeat(" ",(12-(i*2)))
g1= String.Repeat("*",(i*2))
Input.SetText("Input1",Input.GetText("Input1")..rn..g1..rn.."\r\n" );
end;x,y,v = 6,1,-1;end
والله إجابات مختصرة جميلة . لكن للاسف ليست نفس الشكل بالصورة :265:
 

ثامر أبو بلقيس

عضو مشارك
التسجيل
27/3/17
المشاركات
32
الإعجابات
4
#7
و بتعديل بسيط ربما يكون ما تريد
PHP:
Input.SetProperties("Input1", {Alignment=1,Multiline=true});
nor = "=========="
x,y,v = 1,6,1
for n =1,2 do
for i =x,y,v do
rn = String.Repeat(" ",(12-(i*2)))
g1= String.Repeat("*",(i))
Input.SetText("Input1",Input.GetText("Input1")..rn..g1.."|"..g1..rn.."\r\n" );
end;x,y,v = 6,1,-1;
Input.SetText("Input1",Input.GetText("Input1")..nor.."\r\n" );
nor =''
end
 
Ahmed Hatem Ahmed

Ahmed Hatem Ahmed

عضوية الشرف
التسجيل
12/6/15
المشاركات
1,412
الإعجابات
1,629
الجنس
Male
#8
و بتعديل بسيط ربما يكون ما تريد
PHP:
Input.SetProperties("Input1", {Alignment=1,Multiline=true});
nor = "=========="
x,y,v = 1,6,1
for n =1,2 do
for i =x,y,v do
rn = String.Repeat(" ",(12-(i*2)))
g1= String.Repeat("*",(i))
Input.SetText("Input1",Input.GetText("Input1")..rn..g1.."|"..g1..rn.."\r\n" );
end;x,y,v = 6,1,-1;
Input.SetText("Input1",Input.GetText("Input1")..nor.."\r\n" );
nor =''
end
وهل هذا يشبة هذا !! :265:


خلاص لاتتعب نفسك . حلك الاخير هو الاقرب لذا يعتبر إجابة صحيحة .
 
david123

david123

عضو فعال
التسجيل
10/1/12
المشاركات
177
الإعجابات
22
الإقامة
ألاردن
الجنس
Male
#9
جزاك الله خيرا
 

أسيرالشوق

الوسـام الماسـي
التسجيل
4/7/06
المشاركات
16,259
الإعجابات
2,669
الجنس
Male
#10
بارك الله فيك وجزاك خيرا
شكراً لك على الطرح الرائع
 

ثامر أبو بلقيس

عضو مشارك
التسجيل
27/3/17
المشاركات
32
الإعجابات
4
#11
وش من تعب قضية علامات
PHP:
Input.SetProperties("Input1", {Multiline=true,Alignment=1});
nor = "============"
k1="/"
k3="\\"
x,y,v = 1,6,1
for n =1,2 do
for i =x,y,v do
rn = String.Repeat(" ",(12-(i*2)))
g1= String.Repeat("*",(i))
Input.SetText("Input1",Input.GetText("Input1")..rn..k1..g1.."|"..g1..k3..rn.."\r\n" );
end;x,y,v = 6,1,-1;
Input.SetText("Input1",Input.GetText("Input1")..nor.."\r\n" );
k1='\\'
k3="/"
nor =''
end
 
Ahmed Hatem Ahmed

Ahmed Hatem Ahmed

عضوية الشرف
التسجيل
12/6/15
المشاركات
1,412
الإعجابات
1,629
الجنس
Male
#12
وش من تعب قضية علامات
PHP:
Input.SetProperties("Input1", {Multiline=true,Alignment=1});
nor = "============"
k1="/"
k3="\\"
x,y,v = 1,6,1
for n =1,2 do
for i =x,y,v do
rn = String.Repeat(" ",(12-(i*2)))
g1= String.Repeat("*",(i))
Input.SetText("Input1",Input.GetText("Input1")..rn..k1..g1.."|"..g1..k3..rn.."\r\n" );
end;x,y,v = 6,1,-1;
Input.SetText("Input1",Input.GetText("Input1")..nor.."\r\n" );
k1='\\'
k3="/"
nor =''
end
مافي شيء يتقال غير انك انسان رائع .
سيتم اضافة الحلول الآن (لا تنظر الي حلي :Foil:)
 

ثامر أبو بلقيس

عضو مشارك
التسجيل
27/3/17
المشاركات
32
الإعجابات
4
#13
مشكـــور جدا

فقط وددنا مشاركات كثيرة لبقية الأعضاء حتى تتلاقح الأفكار و نستفيد من بعض أكثر

مع تمديد المهلة ليشارك أكبر عدد ممكن بهكذا مهلة تأخذ مسار التحديات البرمجية
و لا أضن أنها الغاية من وراء مثل هاته المواضيع الجميلة

موفقين
 
Ahmed Hatem Ahmed

Ahmed Hatem Ahmed

عضوية الشرف
التسجيل
12/6/15
المشاركات
1,412
الإعجابات
1,629
الجنس
Male
#14
مشكـــور جدا

فقط وددنا مشاركات كثيرة لبقية الأعضاء حتى تتلاقح الأفكار و نستفيد من بعض أكثر

مع تمديد المهلة ليشارك أكبر عدد ممكن بهكذا مهلة تأخذ مسار التحديات البرمجية
و لا أضن أنها الغاية من وراء مثل هاته المواضيع الجميلة

موفقين
جميل سيتم إطالة المدة لكن لا اعتقد ان احدا يدخل التحدي :332:
 

أعلى