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

2. При некоторых условных операторов ошибки. Найдите эти операторы

и укажите эти

1. If 7 then k:=k+1;

2. If x 8 and x<15 then x:=8 else x:=3;

3. If a then b:=a;

4. If a then a:=a+2; else b:=b-1;

5. If a b then a:=a+3; b:=b+1 else a:=a-2;

3. Выберите верный вариант ответа

A) Условный оператор if a mod 2 0 then write ('Да') else write ('Нет') позволяет определить,

является. ли число а:

1) целым

2) нечетным

3) чётным Б) Условный оператор if (a mod 2=0) and (a mod 3= 0) then write ( Да') else write ('Her') позволяет определить, является ли число а:

1) кратным двум и трем

2) не кратным двум и трем

3) кратным двум, но не кратным трем

4) не кратным двум, но кратным трем

4. Дана программа:

A) var x, y: integer; begin readln (x); readin (y); if (x < 20) and (y <= 10)then writeln (ДА') else writeln (HET) end.

Было проведено 5 запусков этой программы, при которых в качестве значений переменных х и у вводились следующие пары чисел: (10, 25); (15, 20); (20, 15); (25, 30); (20, 10). Сколько было запусков, при которых программа напечатала «ДА»?

Б) var x, y: integer; begin readlin(x); readln(y); if (x > = 10) and (y < 20)then writeln ('ДА') else writeln (HET) end.

Было проведено 5 запусков этой программы, при которых в качестве значений переменных х и у вводились следующие пары чисел: (10, 25); (10, 15); (15, 20);(10,10); (20, 20). Сколько было запусков, при которых программа напечатала «ДА

👇
Открыть все ответы
Ответ:
mashuna1
mashuna1
02.07.2021

Если это программа в Кумире, то в таком виде она не заработает.

Нужно исправить ошибки- вместо "куда" должно стоять "кц" (конец цикла),  а первые три строчки должны начинаться с малых букв (иначе система не воспримет их как ключевые слова).

А вообще, здесь задан один цикл для переменной k (от трёх до пятнадцати, то есть 13 разных значений).

Значит, этот цикл будет выполнен 13 раз.

И каждый раз к начальному значению s (ноль), будет прибавляться десять.

В итоге получим  0 + 13 * 10 = 0 + 130 = 130

Более никакие действия с переменными не делаются, сразу печатается на экран значение s, то есть 130


Определите, что будет напечатано в результате выполнения следующего алгоритма алг нач цел s, k s: =0
4,7(50 оценок)
Ответ:
Annkot22
Annkot22
02.07.2021
// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var d:=MatrRandom(m,n,-99,99);
  d.Println(4); Writeln(4*d.ColCount*'-');
  var min:=d.ElementsByRow.Min; // значение минимального элемента
  Writeln('Искомое среднее: ',d.ElementsByRow.Where(t->t<>min).Average)
end.

Пример
Количество строк и столбцов в массиве: 4 7
*** Исходный массив ***
   7 -31  80  21  38 -36  16
  42  93 -11  74  -6  37 -71
  15  90 -71 -88 -71  70 -27
  12  83  41  79  72  91 -88

Искомое среднее: 24.5
4,7(74 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ