[خبر] قرص لتخزين البيانات عضوي

[Delphi4Us]

عودة لدلفي، التحكم براس متحرك ب4محركات يشبه Terminator ببريمج بدلفي XE8 يعمل على جهاز لوحي بنظام Android

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

[محمد عبد العزيز]

مشروع هنا او هناك يتتبع ما يصدر الحرارة فقط ، وحبذا ليس اي حرارة وانما التي تصدر بقدر معين

لا ادري، ريما شيئ يستخدم FLIR Lepton thermal camera

كود :

pureengineering.com/projects/lepton sparkfun.com/products/13233 drone-rss.com/2015/03/25-thermal-camera-cores-for-drones/

[Delphi4Us]

كنت افكر هذه الايام في هذه الاشياء التي تمشي على اربع وكيف تطورت وكنت اتصور منذ زمن وانه لبرمجتها تحتاج كل واحدة الى قرص بيانات خاص بها
وهذا كان قبل تطور الاتصالات ، اما بعد تطور الاتصالات وبخاصة على الاقمار الصناعية والانترنت .
خطر لي خاطر وهو انها لا تحتاج الى قرص بيانات خاص بها .
سيكون العمل المثالي لها هو مبنى كبير يحوي سيرفرات كبيرة تحوي نظام تشغيلها وسلوكها .
تتصل به جميعا لتنفيذ مهمة معينة .
ولو فرضنا ان شركة تريد ان تبرمج آلي لخدمة المنازل وبرمجته تحتاج الى مبنى كبير من الاجهزة التي تعالج المعلومات ليتخذ القرار الصائب .
فافضل طريقة هي باتصالها جميعا بهذه السيرفرات عبر وسيلة اتصال .
لنفرض لدينا سرية مكونة من 200 آلة كهذه لتنفيذ مهمة .

كود :

unit Unit2; interface type  TRobot=class   ID:Integer;   Function Connect():Boolean;   procedure ImportMission();   procedure ReturnBase();   procedure DoMission();  private  public  end; implementation { TRobot } Function TRobot.Connect:Boolean; begin end; procedure TRobot.DoMission; begin end; procedure TRobot.ImportMission; begin end; procedure TRobot.ReturnBase; begin end; end.

هذا صنف العمل

كود :

// تشغيل الالة    Robot:= TRobot.Create;    try      try      // اعطاء رقم تعريف للالة      Robot.ID:=1;      // الاتصال بالقمر الصناعي      Robot.Connect;      // استلام المهمة      Robot.ImportMission;      // تنفيذ المهمة      Robot.DoMission;       except on E: Exception do      end;    finally       //  العودة للقاعدة       Robot.ReturnBase;       //  اطفاء الالة       Robot.Free;    end;

[Delphi4Us]

السلام عليكم

ما فهمته من احد الفيديوهات ان انبوبة صغيرة يمكنك اخفائها براحة اليد تستطيع ان تحوي معلومات 700 قرص ليزري
وان كل بيانات العالم يمكن ان تحولها سيارة في صندوقها الخلفي
هذا بالنسبة لاستخدام الـ DNA كقرص صلب

[Delphi4Us]

والدي ان اي شكله كالتالي




فيمكنك ان تشاهد ان هذا التركيب بالامكان التعامل معه وقراءته وتغيير شكله او شكل محتواه
وبالتالي استخدامه
المهم بالموضوع هو اذا كنت تفكر في طريقة مشابهة اي شئ له شكل يمكن التعامل معه اي تغييره وله تسلسل فيمكن يعدها

[PLANSHARP]

يبدو أن مايكروسوفت قررت شراء مجموعة من أجل التجربة, حيث أنها قد عقدت صفقة مع شركة [size=small]Twist BioScience[/size], المتخصصة في صناعة الحمض النووي.
و حسب إفادة الشركة فإن غرام واحد من الحمض النووي يمكنه تخزين ترليون جيجابايت أي ما يعادل زيتابايت من البيانات الرقمية.

https://www.twistbioscience.com/press/tw...-research/

[Delphi4Us]

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

طالما حشرت انفها بالموضوع فاتوقع الوصول لشئ ما فهي كالذباب لا يطير الا حول شئ

[Delphi4Us]

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

كود :

https://science-effects.blogspot.com/2016/05/breakthrough-in-quantum-computation.html