самым первым электронным программируемым компьютером был 1500 ламповый "коллос", который был создан 1943 году, профессором максом ньюменом в великобритании. он предназначался для расшифровки кодов шифровальной машины "энигма". те работы на которые у механических дешифраторов уходили дни, "колосс" выполнял за несколько часов. информация о нем была под грифом совершенно секретно практически до конца 20 века.
Ответ дал: Гость
var x1,x2,x3,s1,s2,s3: integer;
function sumofnumber(num: integer): integer;
var s: string;
i: integer;
begin
s: =str(num);
for i: = 1 to length(s) do
sumofnumber: = sumofnumber+int(s[i]);
end;
begin
read(x1,x2,x3);
s1: =sumofnumber(x1);
s2: =sumofnumber(x2);
s3: =sumofnumber(x3);
if s1> s2 and s1> s3 then writeln(x1);
if s2> s1 and s2> s3 then writeln(x2);
if s3> s2 and s3> s1 then writeln(x3);
end.
в правильности написания функции типов не уверенна.
Ответ дал: Гость
program d; var s : string; begins : = 'параллелограмм'; delete(s, 1, 9); delete(s, 3, 2); insert('о', s, 3); write(s); end.
Популярные вопросы