for

Решение задачи №19 из главы 13.1

Пользователь передает целое положительное число N, выведете на экран последовательность от 1 до N "ёлочкой", например для N=17:

Решение задачи №7 из главы 10.1

Перебирите в цикле все числа от 1 до 100, выведите на экран каждое 7-е число.

Вывод консоль
7
14
21
28
35
42
49
56
63
70
77
84
91
98

Решение задачи №10 из главы 13.1

Модифицируйте предыдущую задачу так, чтобы в каждой чётной (той, у которой номер чётный) строке выводилось N символов, а в каждой нечетной N/2 символов (сделайте проверку того, что N/2 больше нуля)

Решил задачу, но не до конца мне не совсем понятно как проверить что оно больше нуля.

Решение задачи №9 из главы 13.1

M раз выведете на экран числа от 1 до N с помощью вложенных циклов. Так чтобы в консоли было:
1......N} M раз
1......N}

Задача №1 из главы 10.2

Самостоятельная работа
Модицифируйте код:

var i:integer;
begin
  for i:=1 to 10 do
  begin
     writeln(777);
     break;
  end;
 
  readln();
end.     

-- таким образом, чтобы на 4-ом витке на экран было выведено число 777, а на 5-ом произошел выход из цикла (при этом строчку for i:=1 to 10 оставьте без изменений).

Задача №12 из этого списка:

Условие задачи:

Даны два массива по 20 элементов каждый (заполните случайными числами, так чтобы среди элементов массива при очередном запуске программы могли встретиться и отрицательные и положительные числа). Сравните каждый 3-ий элемент 1-ого массива с каждый 2-ым элементов 2-ого массива - сравнение проводите пока не закончится та выборка, которая короче.

Мое решение:

Реализация №1:

Задачи из этого этого списка

Задачи из этого этого списка

Задачи из этого этого списка

Задачи из этого этого списка