Решите надо 1) дано четырехзначное число. верно ли, что среди его цифр есть кратные трем 2) даны три целых числа. вывести среднее значение числа (средним числом назовем то, которое меньше наибольшего, но больше наименьшего числа) 3) напишите эффективную программ, которая по двум данным натуральным числам х и у, не превосходящим 10000, подсчитывает количество натуральных чисел, заканчивающихся нулем, на отрезке [х,у] (включая концы отрезка).

2) на яве
import java.util.Scanner;
public class Main {
public static void main(String[] args) {
Scanner scn = new Scanner(System.in);
int[] a = new int[3];
int k = 0, m = 0;
for (int i = 0; i < 3; i++) {
a[i] = scn.nextInt();
k = k + a[i];
m++; }
System.out.println(k / m); }}
паскаль
var a: array [1..3] of integer;
i,m,k:integer;
begin
m := 0;
for i := 1 to 3 do
begin
readln(a[i]);
k := k + a[i];
m := m + 1;
end;
write(k / m);
end.