Ответ(ы) на вопрос:
Гость
Program zeck_228;
Var x,a,b,c,d:real;
Begin
Writeln('Введите a');
Readln('a');
Writeln('Введите b');
Readln('b');
Writeln('Введите c');
Readln('c');
Writeln('Введите d');
Readln('d');
x:=((a+b)*c)*d;
Writeln('Ответ=,');
Есть недочеты, но в основном верно
Не нашли ответ?
Похожие вопросы