Var x,y,t:real;
Begin
write('x = ');readln(x);
write('y = '); readln(y);
if x>y then
Begin
t:=y;
y:=(x+y)/2;
x:=x*t*2;
End
else
Begin
t:=x;
x:=(x+y)/2;
y:=x*t*2;
End;
writeln('X = ',x:0:2);
writeln('Y = ',y:0:2);
readln;
End.
А=7
Б=10*7=70
Х=7+70*7=497
ответ: 497
Разбивают на группы по три буквы, затем каждую группу разворачивают "задом наперед":
например:
красота
кра - сот - а
арк - тос - а
значит, чтоб "расшифровать" - делаем то же:
фнимроицая
фни - мро - ица - я
инф - орм - аци - я
Ура!)
Потом монитор перестал работать и компьтер перестал работать тут остальные поняли что свмый важный монитор