var c: real;
begin
readln(c);
writeln(c * 0.5 * c / 2);
end.
Изначально, ТОН, нечетно
ОН, убрали первую букву
ПО, заменили на след. по алфавиту
ПО, четное кол-во символов,
ПАО, добавили А в середину
РБП, заменили на след по алф.
Ответ: РБП
Да. Формула: N=2 в степени i, N=2^i
Var a,b: real;
begin
read(a,b);
if (a=b/2+7) then writeln('проходит') else writeln('не подходит');
end.
сначала вводится возраст жениха