Составить программу. Найти количество всех чисел кратных 5 от 27 до 58 ТОЛЬКО ЧЕРЕЗ БЫСТРЕЕ !
БЫСТРЕЕ !

Программа.
var q,s:integer; 
begin
s:=1;
for q:=1 to 365 do
 s:=s+q;
Writeln(s);
end.

Описание программы.
var q,s:integer; // Объявление переменных, где q - цикл от 1 до 365, s - сумма результата.
begin // Начало выполнение программы.
s:=1; // Присваиваем переменной s значение 1, т.к. по условию 1 рубль.
for q:=1 to 365 do // Цикл от 1 до 365 
 s:=s+q; // Сумма цикла. То есть -  Сумма = Сумма + Цикл с шагом 1. Начальное значение s равно 1, поэтому сумма считывается больше суммы предыдущего дня.
Writeln(s); // Вывод результата.
end. // Конец выполнение программы.

Линейный - самый простой. Например, измерить стороны прямоугольника и найти его периметр.
Начало - Измерить ширину, длину - Удвоить сумму длины и ширины - Записать ответ-периметр - Конец

Разветвляющийся - имеет условие, две "ветки". Ситуация на перекрестке.
Начало - Подошли к перекрестку - Горит зеленый свет? -
         ветка "да": перейти дорогу
         ветка "нет": стоять и ждать зеленый свет
- Конец

Цикл означает повтор какого-то действия, например, покраска стены.
Начало - Подойти к стене и взять кисть и краску -
         начало цикла: обмакнуть кисть в краску и провести по стене,
         пока вся стена не будет закрашена
- Убрать кисть и краску на место  - Конец