30
программу которая будет:
выводить через пробел четные числа между двумя цифрами включительно.

входные данные
вводятся целые числа a и b. гарантируется, что a не превосходит b

выходные данные
выведите (через пробел) все четные числа от a до b (включительно).

пример:

2
5

2 4

// PascalABC.NET 3.0, сборка 1128
var
  i,j,k,n,p:longint;
  f:array[1..10,1..2] of longint;
begin
  p:=2; i:=1;
  f[1,1]:=1; f[1,2]:=1;
  Write('Введите натуральное число не больше 2 147 483 647: ');
  Read(n);
  while n<>1 do begin
    if (n mod p)=0 then begin
      if f[i,1]<>p then
      begin Inc(i); f[i,1]:=p; f[i,2]:=1 end
      else Inc(f[i,2]);
      n:=n div p
    end
    else inc(p)
  end;
  k:=i;
  for i:=2 to k do
    for j:=1 to f[i,2] do Write(f[i,1],' ');
  Writeln
end.

Тестовое решение:
Введите натуральное число не больше 2 147 483 647: 37534
2 7 7 383

= B3 / C3

Объяснение:

Вставляем эту формулу в ячейку D3 и копируем в диапазон ячеек D4:D8

V = S / t

V - скорость движения в км/ч

S - пройденное расстояние в км

t - время движения в ч

Используя эту формулу пишем формулу для Excel заменяя буквы адресами ячеек, где лежат указанные значения

D3 = B3 / C3

В ячейку D3 будет записан результат вычислений скорости по значениям ячеек B3 (расстояние) и C3 (время)

Будем использовать относительные ссылки на ячейки, т.к. нам нужно посчитать скорость для нескольких строк в столбце, поэтому нужно, чтобы при копировании формула изменялась