Кто такой клод шеннон и чем он был знаменит?

Клод Шеннон, был такой Американский инженер и математик, его работы являются синтезом математических идей с конкретным анализом чрезвычайно сложных проблем их технической реализации
Он является основателем теории информации, нашедшей применение в современных высокотехнологических системах связи. Шеннон внес огромный вклад в теорию вероятностных схем, теорию автоматов и теорию систем управления — области наук, входящие в понятие «кибернетика». В 1948 году предложил использовать слово «бит» для обозначения наименьшей единицы информации (в статье «Математическая теория связи»).

//Pascal ABC.NET v3.1 сборка 1172

Var
 f,s:text;
 st,sp:string;
 i:integer;
 c:char;
begin
 assign(s,'text1.txt');
 reset(s);
 while not Eof(s) do
 begin;
 readln(s,sp);
 st:=st+sp+chr(10)+chr(13);
 end;
 close(s);
 for i:=1 to length(st) div 2 do
  begin
   c:=st[i];
   st[i]:=st[length(st)-i+1];
   st[length(st)-i+1]:=c;
  end;
 assign(f,'text.txt');
 rewrite(f);
 write(f,st);
 close(f);
end.

Текст в файле text1.txt:

Simple text
1And another simple text
2New text

Текст в файле text.txt:
txet weN2
txet elpmis rehtona dnA1
txet elpmiS

После рандомного выбора планеты вывести эту переменную:
print(planet)

import random
planets = ['Меркурий', 'Венера', 'Земля', 'Марс',
'Юпитер', 'Сатурн', 'Уран', 'Нептун']
planet = random.choice(planets)
print(planet)
print('Какую планету я загадал?')
answer = input()
if answer == 'Плутон':
(тут пробел)print('Плутон уже не считается планетой.')
elif answer not in planets:
(пробел)print('Да это же вообще не название планеты Солнечной системы.')
elif answer == planet:
(пробел)print('*** Верно! *** Это', answer)
else:
(пробел)print('Неверно!')

Зачем в конце input? Не знаю.