//4. Написать программу на Паскале нахождения наибольшего из трех данных чисел.
var a,b,c:integer; begin writeln('Введите a,b,c'); readln(a,b,c); if a>b then if a>c then writeln('ответ ', a) else writeln('ответ ', c) else if b>c then writeln('ответ ', b) else writeln('ответ ', c) end.
//5.Написать программу на Паскале нахождения периметра прямоугольника, ширину и длину вводить с клавиатуры.
var a,b:integer; begin writeln('Введите a,b'); readln(a,b); writeln('P= ', (a+b)*2); end.
//6. Написать программу на Паскале вычисления значения выражения у=12х2-45х-4
var x:integer; begin writeln('Введите x'); readln(x); writeln('ответ ', 12*power(x,2)-45*x-4) end.
matrix = new int*[mSize]; for (int i = 0; i < mSize; i++) matrix[i] = new int[nSize]; for (int i = 0; i < mSize; i++) for (int j = 0; j < nSize; j++) cin >> matrix[i][j];
cout << "Num. of the elements = " << NumOfElements(matrix, mSize, nSize) << endl;
system("pause"); return 0; } /* End of the 'main' function */
var
a,b,c:integer;
begin
writeln('Введите a,b,c');
readln(a,b,c);
if a>b then
if a>c then
writeln('ответ ', a)
else
writeln('ответ ', c)
else
if b>c then
writeln('ответ ', b)
else
writeln('ответ ', c)
end.
//5.Написать программу на Паскале нахождения периметра прямоугольника, ширину и длину вводить с клавиатуры.
var
a,b:integer;
begin
writeln('Введите a,b');
readln(a,b);
writeln('P= ', (a+b)*2);
end.
//6. Написать программу на Паскале вычисления значения выражения у=12х2-45х-4
var
x:integer;
begin
writeln('Введите x');
readln(x);
writeln('ответ ', 12*power(x,2)-45*x-4)
end.
using namespace std;
long Factorial(int num)
{
long res = 1;
for (int i = num; i > 1; i--)
res *= i;
return res;
}
int NumOfElements(int **matrix, int mSize, int nSize)
{
int res = 0;
for (int i = 0; i < mSize; i++)
{
for (int j = 0; j < nSize; j++)
if (matrix[i][j] % 2 == 0 && matrix[i][j] < 0)
res++;
}
return res;
}
int main()
{
int
num,
**matrix,
mSize,
nSize;
cout << "Input a number: ";
cin >> num;
cout << num << "! = " << Factorial(num) << endl;
cout << "Input a matrix size: ";
cin >> mSize >> nSize;
matrix = new int*[mSize];
for (int i = 0; i < mSize; i++)
matrix[i] = new int[nSize];
for (int i = 0; i < mSize; i++)
for (int j = 0; j < nSize; j++)
cin >> matrix[i][j];
cout << "Num. of the elements = " << NumOfElements(matrix, mSize, nSize) << endl;
system("pause");
return 0;
} /* End of the 'main' function */