Вычисли выражение y=t^2-2t/2+2t^2 паскаль

Думаю, что вы пишете программы на Паскале. Я в нём не очень силён, но попытаюсь решить:
program name;
var x, y, a, b: real;
begin
       write('Введите x, y, a, b: ');
       readln(x,y,a,b);
       if (x > a) then begin
             if(y > b) then begin
                  write('Треугольник со сторонами ', a);
                  write(' и ', b, ' поместится на листе бумаги.');
                  end;
             else writeln('Треугольник не поместится на листе бумаги');
        else writeln('Треугольник не поместится на листе бумаги');
end.

Задача может быть решена в рекурсивной формулировке.
Чтобы перенести 3 коржа с зеленого на красный поднос, нужно перенести все коржи (т.е. 2), кроме нижнего, на желтый поднос, затем переложить оставшийся корж с зеленого подноса на красный и останется перенести два коржа с желтого подноса.
Теперь задача упростилась - сначала надо перенести два коржа на желтый разнос. переносим малый корж на красный, большой =- на желтый, затем поверх кладем меньший корж.
У нас появилась возможность переложить на красный поднос заветный нижний корж.
И решаем последнюю задачу.

Все видно на рисунке во вложении.