Среди всех трехзначных чисел найти кол-во четных, сумму и количество нечетных, произведение чисел кратных 3 1) используя цикл с предусловием 2) с циклом с переменной

Это задача, для решения которой нужно обладать только элементарными знаниями:

1. Оператор цикла for

2. оператор if ... then ... else.

3. оператор вычисления остатка целочисленного деления mod.

3. оператор writeln.

ВСЕ! Алгоритм: цикл по i от 1 до 50, внутри по if (i mod 3=0) Вычисляем sum ... Выводим ... writeln ...