Ребят с этими задачками
Pascal ABC​

Для построения ЭВМ двоичная система счисления оказалась более удобной. С технической точки зрения создать устройство с всего лишь двумя состояниями проще. (есть потенциал -1 \нет - 0)Для их представления достаточно иметь электронные схемы. Официальное рождение двоичной арифметики связывают с именем Г.В.Лейбница, который опубликовал статью, описывающию все арифметические действия над двоичными числами. Потом было более активное и глубокое изучение двоичной системы. Первые двоичные вычислительные машины построили во Франции и Германии. А утверждение двоичной системы в качестве общепринятой приконструировании ЭВМ состоялось уже под влиянием работы А.Бекса, Х. Гольдстайна и Дж.Фон Неймана о проекте первой ЭВМ с хранимой в памяти программой, написанной в 1946 году. В этой же работе и аргументирован переход к двоичной системе.
Проще говоря 1 - есть сигнал, 0 - нет сигнала, намагниченный участок\ненамагниченный и т.д. и машине понятно и человеку можно разобраться, вот так и создали двоичный код, научились по нему программировать, сформулировали принципы, необязательно было все расписывать, главное знать принцип - значение каждой цифры "по месту" при переходе от младшего разряда к старшему увеличивается вдвое. А вот уж языки пограммирования расписываются

Program egor_sasha; var num_eg, num_sash,pri,pri1: real; var mes_eg,mes_sash: real; beginwriteln('numer egora'); readln(num_eg); writeln('numer sashi'); readln(num_sash); writeln('mesto egora (verkh=1,vniz=0)'); readln(mes_eg); writeln('mesto sashi (verkh=1,vniz=0)'); readln(mes_sash); pri: =num_sash+1; pri1: =num_eg+1; if num_eg=pri then    writeln('yes')  else writeln('no'); if num_sash=pri1 then    writeln('yes')  else writeln('no'); if mes_eg=1 then    writeln('egor-high')else  writeln('egor-low'); if mes_sash=1 then    writeln('sasha-high')else  writeln('sasha-low'); end.