2. Найти, делится ли введенное число "а" на 3. Если делится

2. Найти, делится ли введенное число "а" на 3. Если делится то вывести на экран "Число делится на 3".Тип переменной найти без помощи других. При составлении условия учесть, что если число делится на 3, то то остаток от деления на 3 должен быть равен 0.

3. Дана программка на языке Паскаль.
var a,n,s: integer;
begin
s:=0;
n:=0;
repeat;
write('Введите число ');
readln(a);
s:=s+a;
n:=n+1;
until sgt;100;
writeln('Количество введенных чисел = ' ,n);
end.
Переписать программку используя цикл While.

4. Вывести на экран массив целых чисел, Состоящий из 15 частей, значение которого из которых сгенерировано случайным образом из диапазона [20,60].