Помогите написать программу. Паскаль турбо. Дам 35 баллов.

Приложения:

Ответы

Ответ дал: deeniorwork
0

Program abc;

var R, a, b, c, d: integer;

begin

readln(a, b, c, d);

R:=(a+b-c)*d;

writeln(R);

Readln;

end.


Fredny: Нет тут есть пример вывода снизу. Так и должно вывестись.я знаю как написать всю программу не знаю как написать writeln чтобы были скобки а без скобок я знаю
deeniorwork: Поменяй строку writeln(R); на writeln('(',a,'+',b,'-',c,')','*',d,' = ','r');
Вас заинтересует