найти значение выражения y=x+5 при x>0, в противном случае найти значение выражения y=8-5x

Привет можешь помочь? https://znanija.com/task/29199391

Паскаль: Program first;Var y,x;beginwriteln('Введите х');readln(x);if x>0 theny:=x+5;else y:=8-5xwriteln('y = ',y);end.С++int main(){int x,y;cout<<"Введите х"<<endl;cin>>x;if(x>0){y=x+5;}else{y=8-5x}cout<<"Y = "<<y;system("pause");return 0;}

var  x, y: Integer;begin  write('x=');  readln(x);  if x > 0    then y := x + 5  else    y := 8 - 5 * x;  writeln('y=', y);end.