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

Дана блок-схема алгоритма

определить результат выполнения алгоритма при определённых значениях исходных данных

например, при n=4 или n=1

1) ввод: n=4

s=0

k=4

проверка условия k> 2 ю «да» ю s=0+4=4; n=4-1=3

проверка условия k> 2 ю «да» ю s=4+3=7; n=3-1=2

проверка условия k> 2 ю «нет» ю вывод s=7

2) ввод: n=1

s=0

k=1

проверка условия k> 2 ю «нет» ю вывод s=0

👇
Открыть все ответы
Ответ:
Reddi900
Reddi900
22.06.2021
// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('*** Исходный массив A ***');
  var a:=MatrRandom(10,10,0,20);
  a.Println(3); Writeln(3*a.ColCount*'-');
  var b:=a.Rows.Select(row->row.Sum).ToArray;
  Writeln('*** Массив B ***'); b.Println
end.

Пример
*** Исходный массив A ***
  9 15  8 17 18 10 17 15 19 18
 18  0 10  5 20  2 16  3 20 17
  1 11  3  8  4 19 14 10 15 13
  4  2 14 11  4 13 10  2  5  3
  8  5 16 19  1  9 14 16 18 10
  2 14 13 19 19 18 11 20 12 20
 16  7  0  6 13 16  7 20  1  7
 12 14 18 16  9 16 16  5  7 16
  4 19 12  5 10 11  9 16 12  6
  1 10 10  6  7  0  5 10  5  5

*** Массив B ***
146 111 98 68 116 148 93 129 104 59
4,4(20 оценок)
Ответ:
shurakonstantinova
shurakonstantinova
22.06.2021
// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
  var s:=a.IndexesOf(x->x mod 10=0);
  if s.Count=0 then Writeln('Нет элементов, оканчивающихся на 0')
  else begin
    Write('Номера элементов, оканчивающихся на 0: ');
    s.Select(i->i+1).Println
    end
end.

Примеры
n= 12
-41 46 29 -13 -43 -21 48 43 41 -48 -19 -44
Нет элементов, оканчивающихся на 0

n= 16
37 -48 39 32 -6 21 -48 34 6 12 -10 -15 40 -36 46 26
Номера элементов, оканчивающихся на 0: 11 13
4,6(14 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ