program qq;
var x,a,b,c:real;
begin
writeln ('введите a,b,c через пробел');
readln(a,b,c);
x:=(a+b)/c;
writeln('x=',x);
end.

Ответы и объяснения

2013-10-27T16:44:35+04:00
2013-10-27T16:52:27+04:00
Паскаль
program qq;
var x,a,b,c:real;
begin
writeln ('введите a,b,c через пробел');
readln(a,b,c);
x:=(a+b)/c;
writeln('x=',x);
end.