Составить блок-схему алгоритма и программу на Паскале для вычисления функций y(x). Ввести программу, вычислить значения функции и проверить ее. В отчет включить блок-схему алгоритма, текст программы, результат работы кода в виде скриншота окна программы с кодом и полученным результатом. Входные данные задать самостоятельно.
y(x) = (|2x - 5| + b2)x2

Var a,b,i,nod:integer
Begin
a:=-1;
b:=-1;
//ввод первого числа
Writeln('Введите первое число');
While a<0 do
begin
readln(a);
if a<0 then writeln('Ввод ошибочен, повторите ввод первого числа');
end;
//ввод второго числа
Writeln('Введите второе число');
While b<0 do
begin
readln(b);
if b<0 then writeln('Ввод ошибочен, повторите ввод второго числа');
end;
//определение минимального числа
if a>b then i:=b else i:=a;
//перебор чисел от минимального до 0 (т.к. НОД не может быть больше минимального числа)
While nod=0 do
begin
i:=i-1;
if (a mod i = 0) and (b mod i = 0) then nod:=i;
end;
//вывод НОД
Writeln('НОД ', a,' и ', b, ' = ', nod);
end.

#include <iostream>
using namespace std;

int main() {
    int m;
    cout << "m = ", cin >> m, cout << "\n";
    int b[m];
    srand(time(NULL));
    cout<<"array:\n";
    for (int i=0; i<m; i++)
    {
      b[i]=rand() % 50;
      cout<<b[i]<<" ";
    }
    cout << "\n";
    for (int i=0; i<m; i++)
     if ((i+1)%2==0) b[i] *= 2;
     else b[i]=0;
    for (int i=0; i<m; i++) cout << b[i] << " ";
    cout << "\n";
    return 0;
}

Пример:
m = 10
array:
47 3 29 46 36 31 2 2 20 20
0 6 0 92 0 62 0 4 0 40