Задача 1.
Ввести с клавиатуры 3 числа, найти среди них наименьшее. Предусмотреть выводы данных на дисплей.
Решение.

Задача 2.
Ввести с клавиатуры 7 чисел. Вывести на дисплей четные и нечетные числа, указать число четных и нечетных чисел.
Решение

Задача 3.
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от -20 до 20 — сведения о температуре за каждый день апреля. Опишите на русском языке или на одном из языков программирования алгоритм, который находит и выводит минимальную температуру среди дней, когда были заморозки (то есть температура опускалась ниже нуля). Гарантируется, что хотя бы в один день апреля была отрицательная температура.
Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.

const N=30;
var
а: array [l..N] of integer;
i, j, min: integer;
begin
for i:=1 to N do readln(a[i]) ;
...
end.

Решение (примечание: решение задачи в скриншоте для N=6)

Задача 4.

Решение:Записываем в переменную MIN начальное значение, равное 1000. В цикле от первого элемента до двадцатого находим остаток от деления элемента исходного массива на два и на три. Если остаток от деления на два равен нулю и остаток от деления на три не равен нулю, то сравниваем значение текущего элемента массива со значением переменной MIN. Если текущий элемент массива меньше MIN, то записываем в MIN значение этого элемента массива. Переходим к следующему элементу. После завершения цикла выводим значение переменной MIN.

На языке Паскаль алгоритм выглядит так:

min := 1000;
for i:=1 to N do
if (a[i] mod 2=0) and (a[i] mod 3<>0) and (a[i]<min) then
min := a[i];
writeln(min);