Что у меня не верно? даны четыре вещественных числа. найти сумму тех из них, которые больше десяти. var a,b,c,d,s: real; begin writeln('введи числа'); readln(a,b,c,d); s: =0; if (a> 10) then s: =s+a; if (b> 10) then s: =s+b; if (c> 10) then s: =s+c; if (d> 10) then s: =s+d else writeln(s); end.