S:=a*b все просто
a-длина прямоугольника
b-ширина прямоугольника
1) "ЛЕКЦИЯ"
2) "F=18"
3) "COPY('ИНФОРМАТИКА',3,6);"
4) "24 + 24 =48"
5) "ЭЛЕКТРО"
*кавычки не входят в ответ
<em>// PascalABC.NET 3.3, сборка 1590 от 03.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
WriteAllText('out.txt',
ReadAllText('in.txt').ToIntegers.Take(10).Where(t->t>=5).Sum.ToString)
end.
<u>Примечание: если чисел гарантировано 10, то .Take(10) можно убрать</u>
Python3
n = int(input())print(', '.join([str(i) for i in range(1, n + 1) if n % i == 0]))