الگوریتم وارشال برای بدست آوردن بستار متعدی در زبان راست و پایتون

برای شخص بنده با خوندن کد پایتون خیلی راحت‌تر میتونم الگوریتم را بفهمم.اینجا به ترتیب کد راست و پایتون الگوریتم وارشال برای بدست آوردن بستار متعدی یک ماتریس باینری رابطه به همراه لینک کد در گیت‌هاب گیست قرار داده شده.ضمن اینکه زمان اجرا شدن این کد‌ها برای راست و پایتون در گیست مورد نظر به صورت کامنت قرار داده شده است.توجه کنید که در هر دو زبان با حلقه for این پیاده‌سازی انجام شده و در صورتی که با استفاده از map همین الگوریتم را پیاده کنید پرفرمنس احتمالا بهبود خواهد یافت.

دریافت کد منبع ام اس داس ۱ و ۲

در حال حاضر شما میتوانید این سورس را بصورت رایگان دریافت کنید و مطالعه کنید یا دوباره کامپایل کنید.البته این به منزله‌ی متن باز بودن ام اس داس نیست.برای اطلاعات بیشتر میتوانید مقاله نرم افزار متن باز را در دانش نامه آزاد ویکی پدیا مطالعه کنید.مایکروسافت فقط اجازه داده است که این سورس کد برای مصارف آموزشی و تحقیقی مورد استفاده قرار بگیرد و امکان استفاده تجاری از آن وجود ندارد. یعنی نمی توانید آنرا کامپایل کرده و به مردم بفروشید که این خلاف پروانه GPL ( یکی از پروانه های نرم افزار متن باز) است.همچنین اجازه استفاده از کدها در یک نرم افزار دیگر نیز وجود ندارد(یا محدود است) که این هم خلاف پروانه های نرم افزار های متن باز و خلاف ماهیت نرم افزار های متن باز است.البته در ایران شما میتوانید همه این قوانین را نقض کرده و هر کاری که میخواهید بکنید.آنرا کامپایل کرده،بفروشید،به نام خود بزنید،منتشر کنید و ... و هر کاری که میخواهید بکنید.

الآن کد منبع ام اس داس در موزه کامپیوتر با آدرس http://www.computerhistory.org برای دانلود هست.در این موزه علاوه بر سورس ام اس داس، سورس اپل داس(سیستم عامل داس شرکت اپل)،زبان APL از IBM و یک سری عتیقه جات وجود دارد.

حجم: 868 کیلوبایت

یک مشاهده‌گر ساده فایل در فرمت شانزده‌شانزدهی(هکس) به زبان سی

این تکه کد ساده یک مشاهده گر ساده هست که تک تک بایت های فایل را داخل مبنای شانزده(Hex) نمایش میده.

// hexview.c
// Author: FarooqKZ
// It's free software under GPL3+ and comes WITHOUT ANY WARRENTY FROM MAIN AUTHOR
#include <stdio.h>

int main(int argc, char *argv[]){
    if (argc == 1 || !strcmp(argv[1], "-h")){
        printf("Usage: hexview file_path\n");
        return 0;
    }
    FILE *fs = fopen(argv[1], "r");
    long byte_number = 0;
    while(1){
        if ((++byte_number % 26) == 0) // goes to new line each 26 bytes
            printf("\n"); // you may remove this part and then use fold to split it into lines


        int t = getc(fs);
        if (t == EOF)
            break;

        printf("%.2X ", t);
    }
    printf("\n");
    return 0;
}

پیوند کد در گیت‌هاب گیست(برای دریافت به اینجا بروید)