К>В С++, благодаря шаблонам, есть возможность контролировать размеры матриц на стадии компиляции

VAR a: ARRAY 10,10 OF REAL;

К>template<class T>
К>class array2d
К>{
К>public:
К>  int xsize() const;
К>  int ysize() const;

К>  array2d(); // 1*1
К>  array2d(int x, int y);
К>  array2d(const array2d& src);
К>  array2d& operator=(const array2d& src);

К>  T& at(int x, int y);
К>  const T& at(int x, int y) const;
К>};
К>

К>>В С++, благодаря шаблонам, есть возможность контролировать размеры матриц на стадии компиляции

AVC>Например:

VAR a: ARRAY 10,10 OF REAL;

И так в большинстве языков...

VAR a: ARRAY 3,5 OF REAL;
    b: ARRAY 5,7 OF REAL;
    c: ARRAY 4,7 OF REAL;
    d: ARRAY 3,7 OF REAL;

d := a*b;
d := a*c; (* ошибка компиляции: несовместимые операнды *)
c := a*b; (* ошибка компиляции: несовместимые результат и приёмник *)

AVC>Прямоугольник.

AVC>Си++, как всегда, выгодно отличается от Оберона своей простотой.

list<int> data(istream_iterator<int>(dataFile), istream_iterator<int>());

list<int> data(istream_iterator<int>(dataFile), istream_iterator<int>());

Now if you think of the reuse of legacy code, programs and libraries written for other languages, such as C/C++ and maybe Assembler, Pascal, Modula-2, Fortran or some other old language; or commercial libraries written for one of the popular programming languages: don’t worry, as long as whatever code you wish to use conforms to the platform standard for object modules and/or libraries (including dynamic link libraries, DLLs under Windows), you can use it with Oberon-2.

In fact, as long as the Oberon-2 compiler supports interfacing with external libraries (all of those outside of the ETH Oberon System do), it is usually enough to translate the standard .H header files, which are usually supplied with commercial libraries, into an acceptable format. The XDS compiler accepts Modula-2 style definition modules. These can be generated automatically from .H header files, for example by using the utility program H2D.EXE supplied at no cost by XDS (cf. corresponding documentation, or download it from their web site – www.excelsior-usa.com — if you don’t use their compiler).

Unfortunately, this possibility is largely ignored by many programmers. Even many computer magazines perpetuate the assumption that a program that wants to use an API written in C must also use C. According to this logic, all programs would still have to be written in machine language, as all programming languages must be translated into – or must interface with – machine language at some point, which is of course an absurd conclusion.

list<int> data(istream_iterator<int>(dataFile), istream_iterator<int>());

#include <list>

using namespace std;

list<int> data(istream_iterator<int>(dataFile), istream_iterator<int>());

int main()
{
    return 0;
}

list<int> data(istream_iterator<int>(dataFile), istream_iterator<int>());

> Опаньки! неужели сам...

#include <list>
>
> using namespace std;
>
> list<int> data(istream_iterator<int>(dataFile), istream_iterator<int>());
>
> int main()
> {
>     return 0;
> }

> и компилирую. Ошибок нет!

list<int> data( (istream_iterator<int>(dataFile)),  (istream_iterator<int>()) );

AVC>Это хорошо.

AVC>И простотой.

typedef Matrix<3, 3, float> Matrix3d;
typedef Matrix<3, 1, float> Vector3d;
typedef Matrix<1, 3, float> CoVector3d;
// определим скалярное произведение для удобства
float operator * (Vector3d &a, Vector3d &b)
{
  static const Matrix<1, 1, float> transposer = Matrix<1, 1, float>(1.0);
    return (a*transposer*b)[0][0]; // преобразует Vector3d в CoVector3d, чтобы можно было выполнить умножение
}

list<int> data(istream_iterator<int>(dataFile), istream_iterator<int>());

ПК>list<int> data( (istream_iterator<int>(dataFile)),  (istream_iterator<int>()) );

ПК>list<int> data( (istream_iterator<int>(dataFile)),  (istream_iterator<int>()) );
ПК>

ПК>(*) В сознательном вредительстве его можно уличить, т.к. объявления dataFile он не предоставил

// над генератором определены 2 функции: read и end

template<class G>
typename generator_traits<G>::type
read(G gen);

template<class G>
bool
ends(G gen);

// конкретно, с файлом:
template<class T>
struct istream_generator
{
  istream* istr;
};
template<class T>
T read(istream_generator<T> gen)
{
  T var;
  gen.istr->read(var);
  return var;
}
template<class T>
T ends(istream_generator<T> gen)
{
  return gen.istr->eof();
}

// конструктор списка

template<class G>
list<T>::list(G gen)
{
  while(!ends(gen)) push_back(read(gen));
}

template<class T>
struct IGenerator
{
  virtual T read() = 0;
  virtual bool ends() const = 0;
};

template<class T>
struct istream_generator : IGenerator<T>
{
  istream* istr;
  T read() { T var; istr->read(var); return var; }
  bool ends() const { return istr->eof(); }
};

list<T>::list(IGenerator<T>* gen)
{
  while(!gen->ends()) push_back(gen->read());
}

list<int> data(istream_iterator<int>(dataFile), istream_iterator<int>());

ПК>list<int> data( (istream_iterator<int>(dataFile)),  (istream_iterator<int>()) );

T name(U (u), V (v)); // где T, U, V - типы; name, u, v - идентификаторы

AVC>>И простотой.

S>typedef Matrix<3, 3, float> Matrix3d;
S>typedef Matrix<3, 1, float> Vector3d;
S>typedef Matrix<1, 3, float> CoVector3d;
S>// определим скалярное произведение для удобства
S>float operator * (Vector3d &a, Vector3d &b)
S>{
S>  static const Matrix<1, 1, float> transposer = Matrix<1, 1, float>(1.0);
S>    return (a*transposer*b)[0][0]; // преобразует Vector3d в CoVector3d, чтобы можно было выполнить умножение
S>}
S>

float operator * (Vector4d &a, Vector4d &b)

"А если я захочу передать такую матрицу в некую функцию в качестве параметра?"