Sem5000
06.07.2022 17:23

шестой класс Сор по информатике
Сорри за качество учительница так отправила ​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ryschowa
07.12.2021 14:49
Польза:
 Домашку можно списать)))
 1. Можно быстро узнать необходимую информацию;
2. Можно общаться с людьми из других мест;
3. Продвигать бизнес(реклама, видеоконтент и т.д.);
4. Можно заработать много денег, ведя блог или канал
5. Через тот же блог или канал можно творчески самовыражаться.

Вред: 
1. Вред компьютера и др. гаджетов для зрения
2. Зависимость от соц. сетей(лайков, комментов,репостов);
3. Трата времени впустую в ленте вк и инст;
4. Через интернет за нами всеми могут тайно следить, что нарушает наши права
5. Распространение контента 18+(жестокость, насилие и тд, вы поняли)
0,0(0 оценок)
Ответ:
darina2340
07.07.2021 18:11
DIM m AS INTEGER
CLS
INPUT "m=", m
DIM a(1 TO m, 1 TO m) AS INTEGER
RANDOMIZE TIMER
FOR i = 1 TO m
   FOR j = 1 TO m
      a(i, j) = 50 * RND - 25
      PRINT USING ""; a(i, j);
   NEXT j
   PRINT
NEXT i
DIM P AS DOUBLE, S AS INTEGER
DIM B(1 TO m) AS DOUBLE
P = 1
FOR i = 1 TO m
   S = 0
   FOR j = 1 TO m
      IF a(i, j) > 0 THEN P = P * a(i, j)
      S = S + a(i, j)
   NEXT j
   B(i) = S / m
NEXT i
PRINT "P="; P
PRINT "Vector"
FOR i = 1 TO m
   PRINT USING "###."; B(i)
NEXT i

Пример
m=5
   3 -12  -2  -3  -4
  11 -13  21  20  14
  21   5  18 -20  -1
  -3  24 -24 -19   8
 -14 -24  -7  -2  -3
P= 70413235200
Vector
 -3.60000
 10.60000
  4.60000
 -2.80000
-10.00000
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота