В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Strelok72
Strelok72
26.07.2022 14:23 •  Информатика

1. Що таке вкладені розгалуження? Чим вони відрізняються від послідовності розгалужень?
2. Що таке вкладені цикли?
3. Чим може бути корисним використання вкладених розгалужень чи циклів при
складанні програми?
4. Чи можна поєднати алгоритмічні структури повторення та розгалуження в одному
проекті Скретч? Поясни, навіщо це може бути потрібно.​

Показать ответ
Ответ:
ssbina
ssbina
06.09.2020 08:15

<script type="text/javascript">

   // создание многомерного массива.

       var arr = new Array(5);

 arr[0]= new Array(-1, 2, -3, 4, 5);  

 arr[1]= new Array(6, 7, -8, 9, 1);  

 arr[2]= new Array(4, -5, 6, 7, 8);

 arr[3]= new Array(-3, 2, -1, 9, 8);

 arr[4]= new Array(7, -6, -5, 4, -3);  

        for (var i = 0; i < arr.length; i++) {  

           for (var j = 0; j < arr[i].length; j++)  {          

                 if (i==j){

                   if (arr[i][j] < 0)

    arr[i][j]= "0"

               else

                   arr[i][j] = "1" ;

                //вывод заполненной Ячейки сразу      

           }  

  document.write(" "  +arr[i][j]+  "");            

       }  

 document.write("<br/>");

}            

</script>

0,0(0 оценок)
Ответ:
океекй
океекй
28.01.2020 03:38

//PascalABC.NET версия 3.4.0.1677 от 17.06.18

//Если программа не запускается, то обновите версию

uses System.Linq;

function GetPrimes(n: integer): List<integer>;

begin

   var primes := new List<integer>();

   primes.Add(2);

   

   for var i := 3 to n do

   begin

       if primes.All(x -> i mod x > 0 ) then

           primes.Add(i);

   end;

   

   GetPrimes := primes;

end;

begin

   var n := ReadInteger('n =');

   var primes := GetPrimes(2 * n);

   

   foreach var p in primes do

       if primes.Contains(p + 2) then

           writeln(p, ' ', p + 2);

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота