1-ая стена:
1.5*3=4.5 м²
2-ая стена:
2*3=6 м²
Площадь стен всей комнаты:
(6+4.5)*2=21 м²
Судя по всему слова начинаются с предпоследней буквы, хотя я не понимаю, причём здесь информатика.
<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
WriteAllText(ReadlnString('Куда?'),ReadLines(ReadlnString('Откуда?'))
.SelectMany(x->x)
.Where(c->Pos(LowCase(c),'бвгджзйклмнпрстфхцчшщ')>0)
.JoinIntoString)
end.