F=(x-x^2)/(1-(x/2x))

Решите пример в Паскаль Заранее большое

В шарпе чисто на switch сделать практически нереально.
static String getAgeStatus(int age)
{
int type = 6;
if (age < 1) type = 1;
if ((age >= 1) && (age <= 11)) type = 2;
if ((age >= 12) && (age <= 15)) type = 3;
if ((age >= 16) && (age <= 25)) type = 4;
if ((age >= 26) && (age <= 70)) type = 5;
switch (type)
{
case 1:return "младенец";
case 2: return "ребенок";
case 3: return "подросток";
case 4: return "юноша";
case 5: return "мужчина";
default: return "пожилой человек";
}
}

Что будет выведено в результате выполнения:
А: = 'ЭЛЕКТРОСТАНЦИЯ';
WRITELN (COPY (А, 2, 3) + COPY (A, 12, 3) ); ?

ЛЕКЦИЯ

Определите результат выполнения:
С: = ' ЛЕФОРТОВО' ;
F: = LENGTH (С) + LENGTH (С); ?

Переменной F присвоит значение 20

Из слова ИНФОРМАТИКА получено слово ФОРМАТ. Вставьте пропущенные значения
COPY('ИНФОРМАТИКА', ,).

COPY('ИНФОРМАТИКА',3 ,6)

Что будет выведено в результате выполнения:
WRITELN ('24 + 24 =', 24 + 24)?

24 + 24 =48

Что будет выведено в результате выполнения:
А: = 'ЭЛЕКТРОСТАНЦИЯ';
WRITELN(COPY(A,1,7));

ЭЛЕКТРО