fkn+antitotal

Урок 13.1 Задача 3:

Выведите на экран таблицу умножения используя один цикл while и один repeat-until .

Урок 13.1 Задача 2:

Выведите на экран таблицу умножения используя только циклы вида while.

Урок 13.1 Задача 1:

Выведите на экран таблицу умножения используя только циклы вида repeat/until.
Начинаться вывод таблицы должен как-то так:

Урок 12.2 Задача 3:

У вас есть программа, использующая цикл while:

var
   i: integer;
begin
  i:=1;
  while i<=100 do
  begin
    write(i, ' ');
    i:=i+5;
  end;
 
  readln();
end.

Объясните что делает эта программа (что будет выведно на экран и почему)
Перепешите её с помощью цикла repeat/until
Перепешите её с помощью цикла for

Урок 12.2 Задача 2:

Напишите программу, которая выводит на экран ряд чисел с помощью цикла for:

Урок 12.2 Задача 1:

Имеется программа:

var i: integer;
begin
  for i:=5 to 34 do
    write(i, ' ');
 
  readln();
end. 

Ответьте на вопросы/выполните задания

Что в ней происходит?
Что будет на экране после её выполнения?
Перепишите её, используя цикл while.
Перепишите её, используя цикл repeat/until.

Урок 12.1 Задача 7:

Решите с помощью цикла repeat/until:
Выведите на экран, все четные числа от 35 до 117 и нечетные числа, делящиеся на 7 и 3 нацело и при этом лежащие в диапазоне от 45 до 99.
Указание: сначала можно решить задачу двумя циклами, но потом перепишите с использованием одного цикла, в теле которого составьте логическое выражение, описывающее подходящие числа (используйте логические операции).

Урок 12.1 Задача 6:

Решите с помощью цикла repeat/until:
Выведите на экран, все четные числа, делящиеся на 3 и на 6 нацело , лежащие в диапазоне от 35 до 117.

Урок 12.1 Задача 5:

Пользователь вводит в консоль символы (после каждого нажимая Enter), в ответ выводите символ '&', до тех пор пока пользователь не введёт '#', после чего завершите программу (не выводя ничего в ответ).

Еще есть squash для merge

Squash при rebase-е

У этого вариант: