Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 02.06.2011, 00:54
Zolotseme Zolotseme вне форума
Прохожий
 
Регистрация: 02.06.2011
Сообщения: 2
Репутация: 10
По умолчанию Дипломная работа!

Помогите пожалуйста с дипломной работой тема которой звучит так Разработка программного обеспечения для определения языка программирования. Может ктото видел похожую програмку напишите пожалуйста уже сил не имею(((
Зарание спасибо
Ответить с цитированием
  #2  
Старый 02.06.2011, 01:11
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Цитата:
Сообщение от Zolotseme
Помогите пожалуйста с дипломной работой тема которой звучит так Разработка программного обеспечения для определения языка программирования. Может ктото видел похожую програмку напишите пожалуйста уже сил не имею(((
Зарание спасибо

О, уже дипломы пошли...

Кстати какой препод тебе такую тему тему выдумал?

Только это на курсовой с натягом не тянет.

Последний раз редактировалось Konrad, 02.06.2011 в 01:15.
Ответить с цитированием
  #3  
Старый 02.06.2011, 01:21
Zolotseme Zolotseme вне форума
Прохожий
 
Регистрация: 02.06.2011
Сообщения: 2
Репутация: 10
По умолчанию

Вот потому я и страдаю! Я воопще придумала програму на 10 строк!
Суть даной програми загрузить .txt файл з кодом или просто написать в окне код а потом програма должна обработать и определить какой ето язык програмирования. Используэмыэ языки (С++, С, Паскаль, Ассемблер, Бейсик) а прогррамка должна быть на Делфи! Зарание спасибо))))
Ответить с цитированием
  #4  
Старый 02.06.2011, 02:49
ZXCCXZ ZXCCXZ вне форума
Прохожий
 
Регистрация: 10.05.2011
Сообщения: 12
Репутация: 10
По умолчанию

Предлагаю следующее решение:

Код:
program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var a:integer;
s:string;
begin
  randomize;
  write('Введите путь и имя файла программы:');
  readln(s);
  if not FileExists(s) then
  begin
    writeln('Файла не существует!');
    readln;
    exit;
  end;

  a:=Random(5);
  case a of
    0:writeln('Программа на C');
    1:writeln('Программа на C#');
    2:writeln('Программа на C++');
    3:writeln('Программа на Basic');
    4:writeln('Программа на Pascal');
  end;
  readln;
end.

А если всерьёз - нужно дизассемблировать программу и искать в получившимся коде последовательности действий, характерных для определённого языка, перед этим изучить особенности определённых языков.
Ответить с цитированием
  #5  
Старый 02.06.2011, 08:46
Аватар для AND_REY
AND_REY AND_REY вне форума
Активный
 
Регистрация: 31.03.2009
Адрес: Украина, г.Днепропетровск
Сообщения: 324
Версия Delphi: Delphi7
Репутация: 3877
По умолчанию

Можно определить на чём написана прога по именам секций exe. Каждый компилятор создаёт свои имена, + ещё надо искать в заголовке ASP, FSG, UPX,... сигнатуры - чем упакована программа.
Этим методом где то 90% программ можно определить.
__________________
If end Then begin;
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 18:57.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025