Задание. Упростите выражения, используя законы логики.

#include <stdlib.h>
#include <iostream>
#include <iomanip>
using namespace std;

int main() {
const int n = 5;
double a[n][n];
double m1, m2;

srand(time(0));
for (int i = 0; i < n; i++){
 for (int j = 0; j < n; j++){
a[i][j]=-20 + (101.0 / RAND_MAX) * rand();
cout << fixed << setw (7) << setprecision (2) << a[i][j];
 }
cout <<endl;
}
m1=a[0][0];
m2=a[0][n-1];
for (int i = 1; i < n; i++){
 if (a[i][i]>m1) m1=a[i][i];
 if (a[i][n-i-1]>m2) m2=a[i][n-i-1];
 }
 cout << "m1=" << m1 << "  m2=" << m2 << endl;
}
  37.11  71.19  25.77  53.53  35.74
  39.90  63.69  11.67  70.38  -4.10
  64.46  52.37  35.03  42.58  69.18
  44.22   8.46  13.23  71.17   3.10
   6.83  65.07  75.24  21.61  37.22
m1=71.17  m2=70.38

Я, в основном, программы на С++ пишу, но из школы про Паскаль кое-что помню (в смысле, попытаюсь написать на Паскале).

Program A1;

var a,b,c,i:integer;

begin

write('Enter the a: ');

read(a);

writeln('Enter the b: ');

read(b);

с:=0;

for i:=1 to a Do

     c:=c+b;

writeln('a*b=',c:5:0);

end.

Объясняю (начинаю сразу с цикла for): что значит произведение двух натуральных чисел а и b - это означает, сложить b с самим собой по а раз (можно и наоборот). Например, a=5, b=3. Переменную с=0 будем складывать с b.

i=1      c=5+0;

i=2      c=5+5;

i=3      c=10+5;   //c=15

Вот и есть ответ: 5*3=15.