//правильно вот так:
Program al;
var c: real;
begin
c:=4.75;
writeln('c=',c);
end.
11010011-21211-в троичной(11010011(2)=1*2(0)+1*2(1)+0*2(2)+0*2(3)+1*2(4)+0*2(5)+1*2(6)+1*2(7)=211(10)
далее из десятичной в троичную
211/3 остаток 1 ответ 1
70/3 1 и 1
23/3 2 2
7/3 1 1
2/3 2 2
в итоге ответ 21211
Напишу на псевдокоде, потому что не указали язык программирования
ввод числа X
ввод числа Y
ЕСЛИ X>Y ТО
Y=X-Y
X=X*X
ИНАЧЕ
X=Y-X
Y=Y*Y
Вывод X,Y
Это двоичный код соответствующий символу
var
a,b,c: integer;
begin
readln(a,b,c);
writeln(a+b+c)
end.