Есть ответ 👍

От разведчика была получена следующая радиограмма, переданная с использованием азбуки морзе: – – – • – – • – – • – • – • – – •. буквы: т е а г й м б

282
425
Посмотреть ответы 2

Ответы на вопрос:


Мегабайт слово мегабайт
Illia1Z
4,4(27 оценок)

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.

Популярно: Информатика