pascal
Объяснение:
Задание 1
var
i, j, mini, minj: integer;
min: real;
a: array [1..6, 1..8] of real;
begin
min := 30;
for i := 1 to 6 do begin
for j := 1 to 8 do begin
a[i, j] := random(51) - 20;
Write(a[i,j]:6);
if a[i, j] <= min then begin
min := a[i, j];
mini := i;
minj := j;
end;
WriteLn;
WriteLn('Минимальный элемент A[',mini,',',minj,']=', min);
end.
Задание 2
i, j: integer;
a[i, j] := random(11) + 20;
if a[i, j] <= min then min := a[i, j];
for i := 1 to 6 do
for j := 1 to 8 do
a[i, j] := a[i, j] - min;
WriteLn('Новый массив:');
a=int(input('Введите первое число: ')
b=int(input('Введите второе число: ')
c=int(input('Введите третье число: ')
if a > b and c:
print('Наибольшее число: ',a)
elif b > a and c:
print('Наибольшее число: ',b)
else c > b and a:
print('Наибольшее число: ',c)
Первые три команды отвечают за добавление переменным значение, которые будут введены пользователем.
if,elif,else ставят условие, при котором будет выполнено следующие условия, так как переменных 3, то мы вводим ее три раза, каждый раз редактируя ее.
Все они сделаны по таком принципу, если True(правда), то выполнить действие, если False(неправда), то действие отменяется.
В данных командах написано, если а больше b и c, то выполнится условие и на экран выведится текст, с наибольшем числом a.
Если условие не выполняется, программа переходит к условию ниже, если оно аналогично не выполняется, оно переходит к третьему.
pascal
Объяснение:
Задание 1
var
i, j, mini, minj: integer;
min: real;
a: array [1..6, 1..8] of real;
begin
min := 30;
for i := 1 to 6 do begin
for j := 1 to 8 do begin
a[i, j] := random(51) - 20;
Write(a[i,j]:6);
if a[i, j] <= min then begin
min := a[i, j];
mini := i;
minj := j;
end;
end;
WriteLn;
end;
WriteLn('Минимальный элемент A[',mini,',',minj,']=', min);
end.
Задание 2
var
i, j: integer;
min: real;
a: array [1..6, 1..8] of real;
begin
min := 30;
for i := 1 to 6 do begin
for j := 1 to 8 do begin
a[i, j] := random(11) + 20;
Write(a[i,j]:6);
if a[i, j] <= min then min := a[i, j];
end;
WriteLn;
end;
for i := 1 to 6 do
for j := 1 to 8 do
a[i, j] := a[i, j] - min;
WriteLn('Новый массив:');
for i := 1 to 6 do begin
for j := 1 to 8 do begin
Write(a[i,j]:6);
end;
WriteLn;
end;
end.
a=int(input('Введите первое число: ')
b=int(input('Введите второе число: ')
c=int(input('Введите третье число: ')
if a > b and c:
print('Наибольшее число: ',a)
elif b > a and c:
print('Наибольшее число: ',b)
else c > b and a:
print('Наибольшее число: ',c)
Объяснение:
Первые три команды отвечают за добавление переменным значение, которые будут введены пользователем.
if,elif,else ставят условие, при котором будет выполнено следующие условия, так как переменных 3, то мы вводим ее три раза, каждый раз редактируя ее.
Все они сделаны по таком принципу, если True(правда), то выполнить действие, если False(неправда), то действие отменяется.
В данных командах написано, если а больше b и c, то выполнится условие и на экран выведится текст, с наибольшем числом a.
Если условие не выполняется, программа переходит к условию ниже, если оно аналогично не выполняется, оно переходит к третьему.