Напишите программу в паскале

Var A,N,k:integer;

Begin

ReadLn(N);

k:=0;

For N:= 1 to N do

   Begin

   Read(A);

   if (A mod 3 = 0)and(Abs(A) mod 10 = 2) then k:=k+1

   End;

WriteLn(k)

End.

Задание №1. Наименьшее число

Даны целые числа a, b, c. Найдите наименьшее из них.

Программа на Python:

n1, n2 = map(int, input().split())

print(n1 if n1 < n2 else n2)

Задание №2. Количество разрядов

Даны целые числа a, b, c. Найдите количество разрядов этих чисел

Программа на Python:

a, b, c = map(int, input().split())

print(len(str(a)), len(str(b)), len(str(c)))

Задание №3. Исследование треугольника

Даны целые числа a, b,c. Используя эти числа, можно получить три прямоугольника. Для каждого образованного прямоугольника найдите площадь и периметр. Запишите результат в следующем порядке - стороны прямоугольника, его площадь и периметр.

Программа на Python:

a, b, c = map(int, input().split())

print(a, b, a * b, 2*(a + b))

print(b, c, b * c, 2*(b + c))

print(a, c, a * c, 2*(a + c))

Червь  – программа, которая делает копии самой себя. Ее вред заключается в захламлении компьютера, из-за чего он начинает работать медленнее. Отличительной особенностью червя является то, что он не может стать частью другой безвредной программы.Троянская программа (троянский конь, троян)Троянская программа маскируется в других безвредных программах. До того момента как пользователь не запустит эту самую безвредную программу,  троян не несет никакой опасности. Тронская программа может нанести различный ущерб для компьютера. В основном трояны используются для кражи, изменения или удаления данных. Отличительной особенностью трояна является то, что  он не может самостоятельно размножаться.