<span>S(y+x, y, z);
- ошибка
y+x имеет тип real+byte = real и не может быть подставлен туда, где ожидался byte. Это связано с запретом в Паскале неявного приведения вещественного типа к целочисленному.
</span>
Вот :) Надеюсь, всё будет понятно.
Это эмулятор некой платформы,аля windows or linux
для которой нужен дистрибутив
Program qq;
var x: real;
begin
readln (x);
if x>0 then writeln ('положительно')
else writeln ('отрицательно ');
end.
Ответ в файле:vvvvvvvvvvv