Program project1777; uses math, Classes ; var x,y,z:integer; begin writeln('vedite 1 chislo');readln(x); writeln('vedite 2 chislo');readln(y); writeln('vedite 3 chislo');readln(z); begin if ((x>y) and (x>z)) then writeln('samoe bolshoe chislo ',x) else if ((y>x) and (y>z)) then writeln('samoe bolshoe chislo ',y) else if ((z>x) and (z>y)) then writeln('samoe bolshoe chislo ',z); end; begin if ((x<y) and (x<z)) then writeln('samoe malenkoe chislo ',x) else if ((y<x) and (y<z)) then writeln('samoe malenkoe chislo ',y) else if ((z<x) and (z<y)) then writeln('samoe malenkoe chislo ',z); end; readln; end.
Формально к русскоя языке 33 буквы, считая что в вернем и нижнем регистре они разные, то получаем мощность алфавита + цифры 33*2+10=76 к этому идут знаки припинания ,.?!:; (7 включая пробел) ()+-*/= (7 арифм. действий со скобками) итого 90 а теперь начинается куча разночтений, считать ли закрывающие и открывающие кавычки разными? а одинарные с двойными? переносы строк и табуляции? если все брать по максимуму, включая разные _\| и т.д. то получаем еще 30 разных спецсимволов без учета математических дельт, сигм и прочих сумматоров т.о. общяя мощность может считаться равной ~ 120
