Есть ответ 👍

Найти произведение чисел, кратных 5 и не оканчивающихся на 0 в массиве из 10 элементов, принимающих значение от 20 до 30.

254
480
Посмотреть ответы 2

Ответы на вопрос:

sdx2312
4,7(48 оценок)

Pascalabc.net 3.4.2, сборка 1857 от 05.11.2018 внимание! если программа не работает, обновите версию!

begin

  var a : = arrrandom(10, 20, 30);

  a.println;

  var p : = 1;

  foreach var t in a do

    if t = 25 then p *= 25;

  if p = 1 then p : = 0;

  p.println;

end.

24 27 25 24 27 21 27 25 26 25 15625

Обозначения: м - оно мыл максим о - окно мыл олег н - окно мыла настя составим таблицу истинности высказываний детей для каждого случая (т.е. 1) если  окно мыл максим, 2) если олег и т.д.) (см. файл) так как мы знаем,  что трое учеников всегда говорят правду, а двое лгут, то можем увидеть из таблицы, что двое солгали и трое сказали правду в случае, "если окно мыла настя"следовательноответ: настя

Популярно: Информатика