Выражение будет иметь следующий вид: (2+t)*2.
Если нужно вычисление, тогда вот: t вводится с клавиатуры
Program Crt;
Var tmp,t:real;
Begin
WriteLn("Введите t= "); ReadLn(t);
tmp:= (2+t)*2;
WriteLn("Ответ: ", tmp);
readln();
end.
Чтоб выпрялять не роавную поверхность у дерева
Не знаю, какая именно формула у тебя должна быть во втором условии, но ты явно намудрил со скобками
Во-первых, ты пишешь cos(a,3), фактически функция косинуса принимает только 1 аргумент, и если ты хотел косинус в кубе, то тебе надо pow(cos(a),3), примерно так
Монитор системный блок клавиатура мышка
1) друга ищи, а найдёшь - береги.
2) старый друг лучше новых двух.