Клод Шеннон - основатель теории информации в первую очередь. Прожил достаточно долгую плодотворную жизнь(1916 - 2001). Как учёный этот американский математик приложил свои руки и в инженерии, кибернетики, электротехнике, математике и теории информации. Мировую известность ему принесли разработки теории связи кодирования. Отец первой промышленной радиоуправляемой игрушки и первым ввёл понятие "бит" - как информационной единицы измерения. За свои неоценимые заслуги в революционных разработках отмечен многими наградами и премиями, в том числе и Нобелевской премией.
Var s: string; a, b: integer; begin readln(s); if s[1] = 'x' then begin a := StrToInt(s[3]); b := StrToInt(s[5]); if s[2] = '-' then a := -a; writeln(b - a); end else if s[3] = 'x' then begin a := StrToInt(s[1]); b := StrToInt(s[5]); if s[2] = '-' then begin a := -a; b := -b; end; writeln(b - a); end else if s[5] = 'x' then begin a := StrToInt(s[1]); b := StrToInt(s[3]); if s[2] = '-' then b := -b; writeln(a + b); end end.
учтите что никакой защиты от дурака или неверного ввода
