Закодируйте алфавит, символы которого состоят из букв вашего имени. а) Напишите значение каждой буквы этого алфавита. б) Какова его мощность? Мое имя Настя.
В 1942 году американский физик Джон Атанасов и его аспирант Клиффорд Берри разработали и начали монтировать первый электронный компьютер. Работа не была завершена, но оказала большое влияние на создателя первого электронного компьютера ЭНИАК. Тот человек, кто придумал компьютер ЭНИАК – первую электронно-вычислительную цифровую машину, был Джон Мокли, американский физик и инженер. Джон Мокли обобщил основные принципы построения ЭВМ на основе опыта разработки машин и в 1946 году миру предстал настоящий электронный компьютер ENIAC. Руководителем разработки был Джон фон Нейман, изложенные им принципы и структура ЭВМ в дальнейшем так и стали называться – фон-неймановскими
Const V: String = '01'; Function DecToN(A: Longint; D: Byte) : String; Begin If A > D - 1 then DecToN := DecToN(A div D, D) + V[(A mod D) + 1] else DecToN := V [A + 1]; end;
Function NToDec(A: String; D: Byte): Longint; Begin If Length(a) > 0 then NToDec := Pos(A [Length(A)], V) - 1 + D * NToDec(Copy (A, 1, Length(A) - 1), D) else NToDec := 0; end;
Var F: String; Begin Write('Входной файл Input.txt: '); Readln(F); If NToDec(F,2) mod 7 = 0 then Writeln('Выходной файл Output.txt: 0',DecToN(NToDec(F,2) div 7,2)) else Writeln('Выходной файл Output.txt: 0'); end.
Объяснение:
а)Н-настоящая
А-активная
С-самостоятельная
Т-таинствиная
Я-ясная
б)мощность бить во внимание