Хелп ! создать программу, в среде pascalabc, которая будет брать числа из файла "input.txt", суммировать их, и помещать в файл "output.txt"количество чисел заранее не известно вот наработка, исправьте где надо, там какая-то ошибка¯\_(ツ)_/¯ var x, s, q: longint; t: text; begin assign(t, 'input.txt'); reset(t); s: =0; while not eof(t) do begin read(t, x); s: =s+x; end; close(t); assign (t, 'output.txt'); rewrite(t); write(t, 'вот сумма числел из файла input.txt: ', x); close(t); end.

var x, S: longint; t:text;

begin

assign(t,'input.txt');

reset(t);

S:=0;

while not Eof(t) do

begin

read(t,x);

S:=S+x;

end;

close(t);

assign (t,'output.txt');

rewrite(t);

write(t,'Вот сумма числел из файла input.txt: ', S);

close(t);

End.

public static void Main (string[] args) { int N = int.Parse(Console.ReadLine()); int[,] Y = MatrRandom(N,N,-10,10); MatrPrint(Y); Console.WriteLine(GetMaxFromMD(Y)); Console.ReadLine();} static int GetMaxFromMD (int[,] Matr) { int max = Matr [0,0]; for (int i = 1; i<Matr.GetLength(0);i++) if (Matr[i,i]>max) max = Matr[i,i]; return max; } static int[,] MatrRandom (int m,int n,int a,int b) { Random rnd = new Random(); int [,] Matr = new int[m,n]; for (int i = 0; i<m; i++) for (int j = 0; j<n; j++) Matr[i,j] = rnd.Next(a,b); return Matr; } static void MatrPrint (int[,] Matr) { for (int i = 0; i<Matr.GetLength(0); i++) { for (int j = 0; j<Matr.GetLength(1); j++) Console.Write(string.Format($"{Matr[i,j],4} ")); Console.WriteLine(); } }

Пример работы:

То что не в vs, значения никак не имеет: c# везде один.

#include <iostream>

#include <vector>

#include <cmath>

#include <set>

using namespace std;

void swap(int *a, int *b){

   int temp = *a;

   *a = *b;

   *b = temp;

}

signed main() {

   set<pair<int,int>> s;

   int n;

   cin >> n;

   vector<int> a(n);

   for(int &i:a)

       cin >> i;

   int m;

   cin >> m;

   while(m--){

       int x,y;

       cin >> x >> y;

       s.insert({x,y});

       s.insert({y,x});

   }

   for(int i = 0; i < n; i++)

       for(int j = 0; j < n - i - 1; j++)

           if(a[j] > a[j+1] && s.find({a[j],a[j+1]}) == s.end())

               swap(a[j],a[j+1]);

   for(int &i:a)

       cout << i << " ";

}