Программист написал программу вычисления периметра и площади прямоугольника. При запуске программы была выдана ошибка. В какой строке допущена ошибка? Program name; var a,b,s,p:real; begin a:=8, b:=3; p:=(a+b)*2 s=(a*b), write(P=p, S=,s) end

===== С++ 17 =====

#include <iostream>

#include <iomanip>

using namespace std;

int main()

{

   int n = 5;

   int a[n][n];

   srand(time(NULL));

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

   {

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

       {

          a[i][j] = rand() % 199 - 99;

          cout << setw(4) << a[i][j] << " ";

       }

       cout << endl;    

   }

   // матрица готова к работе

   int min = 1000;

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

       if (a[i][n - i - 1] < min)

           min = a[i][n - i - 1];

   cout << "\nMin = " << min;

   return 0;

}

#include <iostream>

#include <iomanip>

using namespace std;

int main()

{

   int n = 3;

   double a[n][n];

   // исходный массив a

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

   {

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

       {

           a[i][j] = 0.1 * i - j;

           cout << fixed << setw(5) << setprecision(1) << a[i][j];

       }    

       cout << endl;

   }    

   // получение и вывод массива b

   double s, b[n];

   cout << endl;

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

   {

       s = 0;

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

           s += a[i][j];

       b[j] = s;

       cout << fixed << setw(5) << setprecision(1) << b[j];

   }

   cout << endl;

   return 0;

}