М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

Составить 2 блок-схемы: 1. private sub command1_click() dim i as integer, j as integer, l as integer, m as integer, b as integer, c as integer, u as integer dim r6() as single, p as integer m = inputbox("количство строк матрицы=") l = inputbox("количество столбцов матрицы=") redim r6(m, l) for i = 1 to m for j = 1 to l r6(i, j) = inputbox("введите r6(" & i & "," & j & ")=") next next p = r6(2, 2) for i = 2 to m step 2 for j = 2 to l step 2 if p > r6(i, j) then p = r6(i, j) b = i c = j u = p end if next next r6(1, 2) = u msgbox ("минимальный элемент с четным индексом r6(" & b & "," & c & ")=" & u) end sub 2. private sub command1_click() dim i as integer, j as integer, m as integer dim w() as single, flag as boolean m = inputbox("введите количество строк") redim w(1 to m, 1 to m) for i = 1 to m for j = 1 to m w(i, j) = inputbox("w(" & i & "," & j & ")=") print w(i, j); next print next flag = false print end sub

👇
Ответ:
elenamatrus777
elenamatrus777
07.12.2021
У меня такая блок-схема ко второму получилась 
Составить 2 блок-схемы: 1. private sub command1_click() dim i as integer, j as integer, l as integer
4,5(98 оценок)
Открыть все ответы
Ответ:
PoLyyKo
PoLyyKo
07.12.2021

n, counter, spisok, new_spisok = int(input()), 0, [], []

while counter != n:

spisok.append(int(input()))

counter += 1

c1, c2 = int(input()), int(input())

for i in spisok:

if c1 <= i <= c2:

new_spisok.append(i)

print(new_spisok, len(new_spisok))

Объяснение:

1) хз зачем там цикл while, но раз в условии написано, то сделал через него;

2) скорее всего работать нужно со списками, а не массивами, так как append - метод списка;

3) если нужно, могу объяснить каждую строку;

4) формат вывода массива не указан, поэтому вывод обычного массива с его длиной через запятую;

5) нижние слеши это пробелы типа)

Объяснение:

4,6(58 оценок)
Ответ:
Selebruty1
Selebruty1
07.12.2021
Const n=8;
var x : array[1..n] of real;
   i : integer; min : real;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do
 begin
  x[i]:=20*random-10;
  write(x[i]:6:2,' ');     
 end;
 writeln;
min:=x[1];
for i:=2 to n do
 if x[i] < min then min:=x[i];
writeln('min=',min:6:2);
for i:=1 to n do
 if x[i]<0 then x[i]:=min;
writeln('Измененный массив:');
for i:=1 to n do write(x[i]:6:2,' ');
end.

Пример:
Исходный массив:
 -7.84  -9.97   7.00  -8.26  -7.71  -3.88   7.59  -2.32 
min= -9.97
Измененный массив:
 -9.97  -9.97   7.00  -9.97  -9.97  -9.97   7.59  -9.97 
4,4(28 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ