Переводчик на все языки

ТЕМА ПРОЕКТА:
ПЕРЕВОДЧИК НА ВСЕ ЯЗЫКА

МОЯ ЦЕЛЬ НАУЧИТЬСЯ ЯЗЫКУ ПРОГРАММИРОВАНИЯ PASCAL И СОЗДАВАТЬ СОБСТВЕННЫЕ ПРОЕКТЫ
ЦЕЛЬ МОЕГО ПРОЕКТА ПОМОГАТЬ ЛЮДЯМ. УМЕНЬШАТЬ ИХ РЕМЯ В ИНТЕРНЕТЕ И УВЕЛИЧИВАТЬ ИХ ВРЕМЯ В ОКРУЖАЮЩЕМ МИРЕ.

ГИПОТЕЗА
Моя гипотеза в том что люди проводят слишком много времени в интернете. Например когда пользуются интернет переводчиком. Часто людям нужно перевести несколько слов на разные языки. В обычных переводчиках надо всегда менять на разные языки, это занимает много времени. Но мой переводчик может перевести любое слово на все языки. Пока что он может переводить только на 5 языков. Это русский, английский, французский, итальянский, шведский. В будущем мой переводчик будет полностью усовершенствован. Но пока мой переводчик уменьшит время людей в интернете и увеличит их время на природе. Они будут меньше смотреть на компьютеры, сотки, планшеты и это поможет их зрению. Мой переводчик очень сильно поможет людям.

В своем проекте я использовал такие переменные как, name: string; n. К сожалению особых формул я не использовал, но я использовал много функций и опереторов.

ПРОГРАММЫ КОТОРЫЕ Я ИСПОЛЬЗОВАЛ
- Для переноса и хранения программы для - Для создания презентаций
других устройств
- Для редактирования картин (изменение - Для создания отчета
размеров, отрезания и т.д)

ТЕСТИРОВАНИЕ
1) Program Translate; var n:string;
begin Writeln('Перевод слов');
;readln(n) if n=('Код') then
Program Translate; var n:string;
begin Writeln('Перевод слов');
;readln(n) ;begin ;if n=('Код') then
2) ;readln(n) ;begin ;if n=('Код') then
Writeln('Английский: Code');
;readln(n) ;begin ;if n=('Код') then
begin Writeln('Английский: Code');
end;

ЗАКЛЮЧЕНИЕ
В заключение могу сказать, что мой проект полностью проверен и готов для работы. В этой нелёгкой четверти я научился программировать на языке Паскаль, хотя у меня были проблемы с парочками операторами и переменными, но они были исправлены. Могу сказать, что моя программа полностью готова и будет полезна для пользователей.