Const n = 10;
var i: byte;
min: real;
imin: integer;
a: array[1..n] of real;
begin
writeln('Введите числа');
for i := 1 to n do
read(a[i]);
min := a[1];
for i := 2 to n do
if min > a[i] then min := a[i];
for i := 1 to n do
if a[i] = min then
imin := i;
writeln('Минимальное значение = ', min);
writeln('Элемент = ', imin);
<span>end.</span>
1) ответ 0
div - целочисленное деление, выдает целую часть после деления
126 div 10 = 12
mod - выдает остаток от деления
12 на 4 делится без остатка поэтому
12 mod 4 = 0
2) ответ 2, 3 и 4 пункты
div - целочисленное деление, выдает целую часть после деления
так что 15 делить на 15 будет 1
в остальных пунктах при делении будет число меньше 1 и оно обрежется до 0
Смотря какой язык
бейсик
if условие then... else
паскаль
if (условие) then... else
c/c++
if (условие){если истина}
else
{если ложь}
Они почти одинаковы только современый телефон, ну он легче и удобнее
Using System;
class Program
static void Main()
{
int n = 5;
int m = 10;
var a = new Int32[n, m];
int imin = 0;
int imax = 0;
int max = 0;
int min = 100;
var random = new Random();
for (var i = 0; i < a.GetLength(0); i++, Console.WriteLine())
for (var j = 0; j < a.GetLength(1); j++)
{
a[i, j] = random.Next(100);
if (max < a[i, j])
{
max = a[i, j];
imax = j;
}
if (min > a[i, j])
{
min = a[i, j];
imin = j;
}
Console.Write("{0,4}", a[i, j]);
}
if (imin == imax)
Console.WriteLine("Элементы находятся в одном столбце");
else
{
Console.WriteLine();
for (int i = 0; i < a.GetLength(0) -1; i++)
for (int j = i + 1; j < a.GetLength(0); j++)
if (a[i,imin] > a[j, imin])
{
var temp = a[i, imin];
a[i, imin] = a[j, imin];
a[j, imin] = temp;
}
for (int i = a.GetLength(0) - 2; i >=0 ; i--)
for (int j = i; j < a.GetLength(0)-1; j++)
if (a[j, imax] < a[j+1, imax])
{
var temp = a[i, imin];
a[j, imax] = a[j+1, imax];
a[j + 1, imax] = temp;
}
for (var i = 0; i < a.GetLength(0); i++, Console.WriteLine())
for (var j = 0; j < a.GetLength(1); j++)
Console.Write("{0,4}", a[i, j]);
}
Console.Read();
}
}