Ы двух строках текстого файла находится по три целых числа.найти разность сумм этих...

Question

Ы двух строках текстого файла находится по три целых числа.найти разность сумм этих чисел. Результат на экран

Answer 1

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadAllLines('input.txt');
  Writeln(s[0].ToReals.Sum-s[1].ToReals.Sum)
end.

Answer 2

#include
#include

using namespace std;

int main ()
{
ifstream in;
in.open ("cin.txt");
int s1=0, s2=0, cinn;
for (int i=0; i<4; ++i)<br>{
in>>cinn;
s1+=cinn;
}
for (int i=0; i<4; ++i)<br>{
in>>cinn;
s2+=cinn;
}
cout<<"S1 - S2 = "<<s1-s2<<endl;<br>return 0;
}

Это на языке С++.