От разведчика была получена следующая радиограмма, переданная с использованием азбуки морзе: – – – • – – • – – • – • – • – – •. буквы: т е а г й м б
282
425
Ответы на вопрос:
Var a,i,b,r: integer; s,se: string; begin; readln(a); repeat b: =a mod 8; a: =a div 8; str(b,se); s+=se; until (a< =7); str(a,se); s+=se; for i: =1 to length(s) div 2 do begin; se: =s[i]; s[i]: =s[length(s)-i+1]; s[length(s)-i+1]: =se[1]; end; val(s,r,a); write(r); end.
Популярно: Информатика
-
polina26050505.04.2023 04:09
-
menoralle29.11.2021 10:48
-
lerkaaaaaaaaa10.12.2021 04:46
-
mariyasidorova112.12.2020 23:36
-
Admiralchik2921.12.2022 09:32
-
zhosik1alika25.06.2023 22:34
-
Gorodnichevavi30.06.2023 11:59
-
ankreinas12.04.2023 08:12
-
brandt0411.08.2020 17:15
-
денчик29808.07.2020 15:55