15-04-2018, 07:24 PM
(15-04-2018, 05:34 PM)محمد الدرة كتب :اجابة صحيحة 100%كود :procedure TForm1.Button1Click(Sender: TObject); var a :integer; begin a:=strtoint(inputbox('a','a','0')); messagebox(inttostr(a*a)); end;
chams derreche
|
أين الخطأ 3
|
|
|
| الردود في هذا الموضوع |
|
أين الخطأ 3 - بواسطة chamsderreche - 14-04-2018, 02:44 PM
RE: أين الخطأ 3 - بواسطة محمد الدرة - 15-04-2018, 05:34 PM
RE: أين الخطأ 3 - بواسطة chamsderreche - 15-04-2018, 07:24 PM
RE: أين الخطأ 3 - بواسطة rahiche - 15-04-2018, 08:25 PM
RE: أين الخطأ 3 - بواسطة chamsderreche - 16-04-2018, 10:48 PM
RE: أين الخطأ 3 - بواسطة youryour - 16-06-2023, 11:09 AM
|
يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم