Компьютерлік вирус деген не​

10. a = 1     b = 1       или      a = 2     b = 2

11. a = 48

12. повторение какого-либо действия    iteratio     латинский язык

Объяснение:

10.

условный оператор

если условие: сумма а + b * 3 чётная верно, то вывод Да

сумма двух нечетных чисел - четное число:

а - нечетное число

b * 3 - нечетное число

произведение двух нечетных чисел - нечетное число:

b - нечетное число

3 - нечетное число

следовательно a и b любые нечетные числа

или

сумма двух четных чисел - четное число:

а - четное число

b * 3 - четное число

произведение четного и нечетного чисел - четное число:

b - четное число

3 - нечетное число

следовательно a и b любые четные числа

11.

цикл должен выполниться 4 раза

пока условия: а - четное и а > 5 верно, то выполняется действие а = a div 2

div - целочисленное деление (без остатка)

1 div 2 = 0   (остаток 1 не учитывается)

2 div 2 = 1   (остаток 0 не учитывается)

3 div 2 = 1   (остаток 1 не учитывается)

минимальное целое число, которое соответствует условию а - четное и а > 5 это а = 6

значит после выполнения действия а = a div 2 = 6 div 2 = 3

при а = 3 условие а - четное и а > 5 станет ложным и цикл закончится

заменим действие  а = a div 2 на обратное  а = a * 2

а = 3

а = a * 2 = 3 * 2 = 6 (условие а - четное и а > 5 верно)

а = a * 2 = 6 * 2 = 12 (условие а - четное и а > 5 верно)

а = a * 2 = 12 * 2 = 24 (условие а - четное и а > 5 верно)

а = a * 2 = 24 * 2 = 48 (условие а - четное и а > 5 верно)

так как цикл должен выполниться 4 раза, то а = 48

12. Итерация (лат. iteratio "повторение") - повторение какого-либо действия. Итерация в программировании - один шаг циклического процесса.

Если число заканчивается на 5 или 0, то по признакам делимости оно кратно 5.

1. Глупый школьный вариант

Перебираем все числа в заданном диапазоне и если встречаем кратное 5, прибавляем его к сумме.

var
  i,s:integer;

begin
  s:=0;
  for i:=1 to 200 do
    if i mod 5=0 then s:=s+i;
  Writeln(s)
end.

Результат:
4100

2. Более умный школьный вариант с циклом while

Первое число, кратное 5 - это 5. А дальше прибавляем по 5 к сумме и ничего не нужно проверять.

var
  i,s:integer;

begin
  i:=5; { первое подходящее число }
  s:=i;
  while i<200 do begin
    i:=i+5;
    s:=s+i
    end;
  Writeln(s)
end.

3. Еще более умный школьный вариант с циклом for

От предыдущего отличается получения нужных чисел.
Замечаем, что ряд 5, 10, 15, 20, ... можно получить из чисел 1, 2, 3, 4, ..., умножая их на 5. И таких чисел будет 40.

var
  i,s:integer;

begin
  s:=0;
  for i:=1 to 40 do s:=s+5*i;
  Writeln(s)
end.

4. Современный вариант на современном Паскале

Генерируем последовательность нужных чисел и находим сумму её элементов.

// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  Range(5,200,5).Sum.Println
end.