#include <iostream>
using namespace std;
int main()
{
int line, column;
cout << "Введите количество строк и столбцов через пробел: ";
cin >> line >> column;
int array[50][50] = {};
cout << "Введите элементы двумерного массива: \n";
for (int i = 0; i < line; i++)
{
for (int j = 0; j < column; j++)
{
cin >> array[i][j];
}
}
int min = array[3][0];
int column_number = 1;
for (int j = 0; j < column; j++)
{
int i = 3;
if (min > array[i][j])
{
min = array[i][j];
column_number = j + 1;
}
}
cout << column_number;
}
Объяснение:
#include <iostream> // Библиотека ввода - вывода
using namespace std; // Пространство имен
int main()
{
int line, column; // Создание целочисленных переменных, отвечающих за количество строк и столбцов в двумерном массиве
cout << "Введите количество строк и столбцов через пробел: "; // Вывод сообщения в консоль
cin >> line >> column; // Ввод количества строк и столбцов с клавиатуры
int array[50][50] = {}; // Создание целочисленного массива размером 50х50
cout << "Введите элементы двумерного массива: \n"; // Вывод сообщения в консоль
for (int i = 0; i < line; i++) // Цикл для ввода элементов массива
{
for (int j = 0; j < column; j++) // Цикл для ввода элементов массива
{
cin >> array[i][j]; // Ввод элементов массива
}
}
int min = array[3][0]; // Присваиваем переменной, хранящей минимум, значение массива в 3 строке и 0 столбце
int column_number = 1; // Переменная, хранящая номер столбца
for (int j = 0; j < column; j++) // Цикл для прогона значений 4-й строки
{
int i = 3; // Нужны значения определенной строки ⇒ значение переменной i будет постоянным
if (min > array[i][j]) // Если значение переменной min > значения массива i строки и j столбца
{
min = array[i][j]; // Значение переменной min = значению массива i строки и j столбца
column_number = j + 1; // Номер столбца = индекс столбца + 1 (т. к. индексация начинается с нуля)
}
}
cout << column_number; // Вывод ответа
}
ответ:var
n, i: word;
sum: real;
begin
write ('n = '); readln (n);
sum := 0;
for i := 1 to n do
sum := sum + 1/(i*i);
writeln (sum:6:5);
readln
end.
gene 16/06/2017
a(a-1)(a-2)(a-3)...(a-n)
var
a,n,i: integer;
mult: longint;
begin
write('Введите a: ');
readln(a);
write('Введите n: ');
readln(n);
mult := a;
for i:=1 to n do
mult := mult * (a - i);
writeln(mult);
end.
1/a + 1/(a+1)+...+1/(a+n)
var
a,n,i: integer;
sum: real;
begin
write('Введите a: ');
readln(a);
write('Введите n: ');
readln(n);
sum := 0;
for i:=0 to n do
sum := sum + 1/(a + i);
writeln(sum:5:2);
end.
Объяснение: