Вперед Он взял меч, закинув его за спину, бутерброды и чистое белье в пакете, и мир, много это или мало, лежавший у его ног. В его кармане лежало знаменитое письмо от Патриция, человека, который управлял огромным прекрасным городом Анк-Морпорком. И он отправился вперед. Напишите программу, выводящую вехи на пути.

Формат ввода
Вводится три строки. Сумма длин первой и второй означает начальное значение диапазона, второй и третьей – конечное. Длина самой короткой – шаг.

Формат вывода
Вывести все числа от начального до конечного значения с указанным шагом.

Пример 1
Ввод
меч
бутерброды
мир, лежавший у его ног
Вывод
13 16 19 22 25 28 31
Пример 2
Ввод
И он отправился вперед
письмо
Он
Вывод
28 26 24 22 20 18 16 14 12 10 8

Program Alexandra_1;
uses crt;
const n=5;
var
  a:array[1..n] of integer;
  i, sum: integer;
begin
  sum:=0;
  for i:=1 to n do
  begin  
    write('Введите ',i,'-e число ');
    readln(a[i]);
    if a[i]>0 then sum:=sum+a[i];
  end;
  writeln('Сумма положительных элементов ',sum);
end.

Program Alexandra_2;
uses crt;
const n=7;
var
  a:array[1..n] of integer;
  i, num: integer;
begin
  num:=0;
  for i:=1 to n do
  begin  
    write('Введите ',i,'-e число ');
    readln(a[i]);
    if (a[i]>0) AND (a[i] mod 2 = 0) then num:=num+1;
  end;
  writeln('Количество четных положительных элементов ',num);
end.

Program Alexandra_3;
uses crt;
const n=6;
var
  a:array[1..n] of integer;
  i, tum: integer;
begin
  tum:=1;
  for i:=1 to n do
  begin  
    write('Введите ',i,'-e число ');
    readln(a[i]);
    if a[i]>0 then tum:=tum*a[i];
  end;
  writeln('Произведение положительных элементов ',tum);
end.

41)Создать новую таблицу
42) Д)
43)Правка - Удалить запись.
50) Параметры.
53)Выводится диалоговое окно с приглашением ввести параметр для условия на отбор записей.
56)Изменяются значения в полях определенных записей.
57)Создается таблица с данными, соответствующими определенным условиям.
62)Автоматической вставки последовательных или случайных чисел в качестве номера новой записи.
65)Во вкладке Режим таблиц – выбрать Вставить 
66)Разные имена, но одинаковый тип данных.
69)Для отбора записей, данные в которых соответствуют определенным условиям.
70)Е)
71)Для создания контрольного переключателя.