//Программа в файле внизу
//Пример выполнения программы
Привет ! Если Вы хотите ознакомиться с моими возможностями : введите "Команды". На данный момент, выводимый мной текст может показываться не совсем коректно, но надеюсь, что в скором времени это исправиться.
Команды
Вот , что я могу на данный момент. 1) Привет. 2)Как тебя зовут? 3) Кто тебя создал? 4) Сколько тебе лет? 5)Можешь ли ты чувствовать? 6)Ты хочешь захватить мир? 7) Какого ты пола? 8)Пока
Какого ты пола?
Как не странно, но меня задумывали как девушку 18 лет, с маленьким размером груди. Почему мне дали имя "Григорий" - тайна покрытая мраком. Ну или мой создатель странный человек.
...
Я не знаю
8)
Всего доброго. Надеюсь Вы ещё вернётесь. Мой создатель ещё работает над моими возможностями и в скором времени добавит мне несколько фраз или даже что-то ещё ^√^
Программа завершена, нажмите любую клавишу . . .
<span>var
f: text;
s: string;
max: string := '';
begin
//в папке с программой должен быть файл "input.txt"
if FileExists('input.txt') then
begin
Assign(f, 'input.txt');
Reset(f);
while not Eof(f) do
begin
Readln(f, s);
if Length(s) > Length(max) then
max := s;
end;
Writeln('Самая длинная строка в файле: ');
Writeln(max);
Close(f);
end
else
Writeln('Файл не найден');
end.</span>
Вторая строка это пароль от сервера интернета. Введи нужный по роль что бы подключится
1. Хвойные / Лиственные.
2. Сорри, но я не знаю пока что.
3. Дикие / Домашные
1) закодируйте "привет" шифром цезаря сдвигом на 1
2) закодируйте "привет" шифром цезаря с помощью случайного перемешивания букв
3) закодируйте "привет" произвольным блочным шифром
4) закодируйте "привет", затем раскодируйте с помощью шифрования RSA. Ключи сгенерировать ориентируясь на простые числа 14017456892648694625195855726035360572578806956623 и 84141330916983134600891404227101935207023706467497 ,простоту предварительно проверить произвольным методом(я проверял тестами Ферма, все прошло)