Var a, x: longint;
begin
readln (a);
x:=-a;
writeln ('x1=0');
writeln ('x2=',x);
end.
begin
var m := 3;
var n := 3;
var a := MatrRandom(m, n, 0, 9); a.Println;
var b := new integer[m];
for var i := 0 to m - 1 do
b[i] := a.Row(i).Sum;
b.Println;
var c := new integer[n];
for var j := 0 to n - 1 do
c[j] := a.Col(j).Min;
c.Println;
end.
Ответ:#include <iostream>
#include <vector>
using namespace std;
int main() {
int n,k,l,r;
cin >> n >> k;
vector <char> a(n,'I');
for (int i = 0; i < k; i++) {
cin >> l >> r;
for (int j = l-1; j < r; j++) {
a[j] = '.';
}
}
for (auto now: a) {
cout << now;
}
return 0;
}
Объяснение: ну, вот так как-то, если на c++