Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Решите паскаль:
((a+b)c)d=x
a=5
b=4
c=6
d=8

Ответ оставил Гость

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(Ответ=,);
Есть недочеты, но в основном верно