ДАНЫ ДВА ЧИСЛА X И Y НАЙТИ СУММУ И СРЕДНЕАРЕФМЕТИЧЕСКОЕ

Pascal:
var x,y:real;
begin
  write ('X = ');
  readln(x);
  write ('Y = ');
  readln(y);
  writeln ('Summa: ',x+y);
  writeln ('Srednee: ',(x+y)/2);
  readln;
end.

C++:
#include <iostream>
using namespace std;

int main()
{
   float x,y;
   cout <<"X = ";
   cin >>x;
   cout <<"Y = ";
   cin >>y;
   cout <<"Summa: " <<x+y <<endl
          <<"Srednee: " <<(x+y)/2 <<endl;
   return 0;
}