I-вариант1. определить значение переменной c по фрагменту программы.a: =22; b: =3; a: =-2*b+a/2if a < b thenc: =4*b-3*aelse c: =3*a+4*b; 2. преобразовать алгоритмический язык в язык pascalалг максимальное числонач цел a,b,mввод a,b если a> =bто m: =aиначе m: =bвсевывод mкон ii-вариант1.определить значение переменной c по фрагменту программы.a: =30; b: =6; a: =a/2*bif a > b thenc: =a-3*belse c: =a+3*b2. преобразовать алгоритмический язык в язык pascalалг выражениенач цель xвещ yввод xесли x> =0то y: =sqrt (x)иначе y: =abs (x)всеввод yкон

#include <iostream>

#include <cstdlib>

using namespace std;

int main()

{

setlocale(LC_ALL,"russian");

cout << "Введите размер массива: ";

int N;

cin >> N;

N=N--;

unsigned int a[N];

for (int b = 0; b<=N; b++)

{

cout << "Введите число номер " << b << ": ";  

cin >> a[b];

}

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

{

if(a[i]<=255)

{

 cout << "Количество разрядов числа " << a[i] << " - 8" << endl;

}

if(a[i]>=256 && a[i]<=65535)

{

 cout << "Количество разрядов числа " << a[i] << " - 16" << endl;

}

if(a[i]>=65536 && a[i]<=4294967295)

{

 cout << "Количество разрядов числа " << a[i] << " - 32" << endl;

}

}

   system("pause");

   return 0;

}

Надеюсь, правильно понял определение разрядов.

Есть пожелания - в комментарии

1)

var n,k: integer;

begin

readln(n);

if (n>0) and (n<10) then k:=1

else if (n>9) and (n<100) then k:=2

else k:=3;

write(k);

end.

2)

var a,b,c: integer;

D,x1,x2: real;

begin

readln(a,b,c);

D:=b*b-4*a*c;

if(D>0) then begin

x1:=((-1)*b+sqrt(D))/(2*a);

x2:=((-1)*b-sqrt(D))/(2*a);

write(x1,' ',x2);

end else if (D=0) then begin

x1:=(-1)*b/(2*a);

write(x1);

end else write('Нет решений');

end.

3)

var x,y: integer;

begin

readln(x,y);

if(x=0) or (y=0) then write('точка лежит на координатной оси')

else begin

if(x>0) then begin

if(y>0) then write('I')

else write('IV');

end else

if(y>0) then write('II')

else write('III');

end;

end.