Question

Паскаль Дано N чисел. Найти и выписать числа,большие десяти и кратные трём

Answer 1

12,15,18,21,24,27,30

Answer 2

Для решения данной задачи вам потребуется написать программу на языке программирования. Возьмем пример на псевдокоде, похожем на Паскаль, так как вы упомянули его:

pascalCopy code
// Объявляем массив из N элементов
const
  N = 10;
var
  numbers: array[1..N] of integer;
  i: integer;

// Заполняем массив случайными числами для примера
for i := 1 to N do
  numbers[i] := Random(20); // Генерируем случайные числа от 0 до 19

// Находим числа, большие 10 и кратные трём
writeln('Числа, большие 10 и кратные трём:');
for i := 1 to N do
begin
  if (numbers[i] > 10) and (numbers[i] mod 3 = 0) then
    writeln(numbers[i]);
end;

Программа объявляет массив из N элементов и заполняет его случайными числами для примера. Затем она находит числа, большие 10 и кратные трём, и выводит их на экран. Вы можете изменить значение N или заполнить массив своими числами, если нужно.

Если вы используете другой язык программирования, синтаксис может отличаться, но общая логика останется такой же. Вам нужно объявить массив, заполнить его числами и затем пройтись по массиву, проверяя каждый элемент на соответствие условиям больше 10 и кратности трём. Если условие выполняется, выводите число на экран.