1.В линейном алгоритме … 2.Оператор ввода...

3.Оператор вывода ...

4.Оператор полного ветвления

5.Формат оператора неполного ветвления

6.Разветвляющийся алгоритм

7.Операторные скобки
​

[Текст из сниппета]

[Припев]

Эти цепи на мне, сук, лавэ

Сотка тыщ на Black LV

Сотни сук хотят ко мне

Сотни сук хотят ко мне

Как дела? Как дела?

Это новый Cadillac

Делать деньги, делать деньги

Делать деньги, бл*ть, вот так (few-few)

[Куплет]

...

Быстрей, посмотри

Вам подарок, а мне часы

Drip на шее, всё под жопой

Мне чуть больше двадцати

[Припев]

Эти цепи на мне, сук, лавэ

Сотка тыщ на Black LV

Сотни сук хотят ко мне

Сотни сук хотят ко мне

Как дела? Как дела?

Это новый Cadillac

Делать деньги, делать деньги

Делать деньги, бл*ть, вот так (few-few)

Если считать отрицательные трехзначные, то сумма таких чисел в диапазонах от -999 до -100 и от 100 до 999 будет равна 0. Для только положительных:

//c циклом for
var s,i:integer;
begin
  for i:=100 to 999 do
    if i mod 77 = 0 then s:=s+i;
  writeln('Сумма трехзначных кратных 77: ',s);
end.

Тестовое решение:
Сумма трехзначных кратных 77: 5929

// с циклом while
var s,i:integer;
begin
  i:=100;
  while i<=999 do begin
    if i mod 77 = 0 then s:=s+i;
    i:=i+1;
  end;
  writeln('Сумма трехзначных кратных 77: ',s);
end.