Question

Составить программу которая вычисляет сумму двухзначных чисел кратных числу 10(паскаль)​

Answer 1

Решение представлено во вложении.

Answer 2

Приведу пример программы на языке Pascal, которая вычисляет сумму двухзначных чисел, кратных 10:

pascalCopy code
program SumOfMultiplesOf10;

var
  sum, number: integer;

begin
  sum := 0;
  
  for number := 10 to 99 do
  begin
    if number mod 10 = 0 then
      sum := sum + number;
  end;
  
  writeln('Сумма двухзначных чисел, кратных 10, равна ', sum);
end.

Эта программа начинает перебор чисел от 10 до 99 и проверяет, делится ли текущее число на 10 без остатка с помощью оператора mod. Если да, то число добавляется к сумме. В конце программа выводит сумму на экран.