Решить на массивы,! 1.найти сумму элементов в каждом столбике массива mxn, элементы которого датчиком случайных чисел на интервале [-19; 20] 2.найти наименьшее четное число в матрице размером mxn, элементы которого датчиком случайных чисел.

👇

Ответ:

bodnarhuk83

09.02.2022

1)
uses crt;
const
n=5;m=7;
var
i,j,s:integer;
a:array[1..n,1..m]of integer;
  begin
randomize;
clrscr;
for i:=1 to n do
begin
for j:=1 to m do
begin
  a[i,j]:=random(40)-19;
write(a[i,j]:4);
end;
  writeln;
end;
writeln;
for j:=1 to m do
begin
  s:=0;
for i:=1 to n do
  s:=s+a[i,j];
writeln ('j:',j,' ', s);
writeln;
  end;
end.

4,4(59 оценок)

Открыть все ответы

Ответ:

missaki999

09.02.2022

1.var
max,min,i:integer;
b:real;
a:array[1..9]of integer;
begin
for i:=1 to 9 do
begin
while (a[i]<1) or (a[i]>6) do
begin
write(i,' оценка: ');
readln(a[i]);
end;
if i=1 then
begin
max:=a[1];
min:=a[1];
end;
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
b:=b+a[i];
end;
b:=(b-min-max)/7;
writeln('Зачетная оценка: ',b);
end.

2. #include <stdafx.h>
#include <stdio.h>
#include <math.h>
#include <stdlib.h> //for rand;
int main()
{
int i, n,M[1];
printf("Vvedit N:");
scanf("%d",&n);
for (i = 0; i < n; i++)
{
M[i] = rand()%10;
}
for (i = 0; i < n; i++)
{
printf("Array[%d] = %d\n", i, M[i]);
}
scanf("%d");
return 0;
}

3. var

a:array[0..9] of integer;
i,y,min:integer;
begin
randomize();
for i:=0 to 9 do
begin
y:= random(10);
a[i]:= y;
end;
for i:=0 to 9 do write(a[i],' ');
writeln(' - десять випадковых чисел');
min:=a[0];
for i:=1 to 9 do
if a[i]<min then min:=a[i];
writeln(min, ' - минимальне число.');

end.

4,8(93 оценок)

Ответ:

eliza1404

09.02.2022

ответ: $\overline A \lor \overline B$ .

Пошаговое объяснение:

Во-первых, как можно заметить, от C значение функции не зависит.

Особенно это хорошо видно на последних двух строчках. Если убрать переменную C, то получиться таблица из 4 строк:

A B F

0 0 1

0 1 1

1 0 1

1 1 0

Это таблица истинности для отрицания И: $\overline{A \land B} = \overline A \lor \overline B$ - ответ.

На этом можно было бы остановиться (проверить по таблице истинности с учётом бесполезного С), но сделаем ещё кое-что - выведем это шаг за шагом, докажем, что С - бесполезная и никому не нужная переменная.

Запишем то же выражение в совершенной конъюнктивной нормальной форме. Выберем стоки, которые обращают выражение в Ложь.

A B C F

1 1 0 0

1 1 1 0

Две строки - две скобки. Единица в таблице означает отрицание переменной в скобке. Получаем $F = (\overline A \lor \overline B \lor \overline C) \land (\overline A \lor \overline B \lor C)$ .

Тут уже видно, что переменная С на результат не влияет. Упростим и приведём это к выражению выше.

$(\overline A \lor \overline B \lor \overline C) \land (\overline A \lor \overline B \lor C) = (\overline A \lor \overline B \lor \overline C) \land \overline A \lor (\overline A \lor \overline B \lor \overline C) \land \overline B \lor (\overline A \lor \overline B \lor \overline C) \land C =$

$= \overline A \land \overline A \lor \overline B \land \overline A \lor \overline C \land \overline A \lor \overline A \land \overline B \lor \overline B \land \overline B \lor \overline C \land \overline B \lor \overline A \land C \lor \overline B \land C \lor \overline C \land C =$

$= \overline A \lor \overline B \land \overline A \lor \overline C \land \overline A \lor \overline A \land \overline B \lor \overline B \lor \overline C \land \overline B \lor \overline A \land C \lor \overline B \land C \lor 0 =$

$= \overline A \lor \overline B \lor [(\overline B \land \overline A) \lor (\overline A \land \overline B)] \lor [(\overline C \land \overline A) \lor(\overline A \land C)] \lor [(\overline C \land \overline B) \lor (\overline B \land C)] =$

$= \overline A \lor \overline B \lor (\overline A \land \overline B) \lor \overline A \land (\overline C \lor C) \lor \overline B \land (\overline C \lor C) =$