1.Найти количество натуральных чисел, не превышающих 100 и кратных 5.
2.Создать массив А из 10 элементов, принадлежащих промежутку (0;25). Вывести полученный массив на экран. Подсчитать количество элементов, больших А [1]. Все с помощью Паскаля

1.var i,k:integer;begink:=0;for i:=1 to 100 dobeginif (i mod 5 = 0) then k:=k+1;end;writeln (k);end.