Question

Сделйте блок схему программы через for, пожалуйста! Целое число n вводится с клавиатуры. в диапазоне [10;-10] найти сумму и колоичество чисел, кратных n.

Answer 1

Var n,k,sum,i:integer;
begin
readln (n);
if (n<10)and(n>-10) then
for i:=1 to 10 do begin
if n mod i=0 then
sum:=sum+i;
k:=k+1;
end;
writeln(sum, ' ', k);
end.

Answer 2

Конечно! Вот блок-схема программы для нахождения суммы и количества чисел, кратных заданному числу n в диапазоне от 10 до -10:

luaCopy code
  +----------------------------------+
  |    Ввод значения n с клавиатуры   |
  +----------------------------------+
              |
              v
  +----------------------------------+
  |  Инициализация суммы и счетчика  |
  |          sum = 0, count = 0      |
  +----------------------------------+
              |
              v
  +----------------------------------+
  |    Для i от 10 до -10 с шагом -1 |
  |           (цикл для диапазона)   |
  +----------------------------------+
              |
              v
  +----------------------------------+
  |  Если i кратно n (i % n == 0)    |
  |        то                        |
  |    +-----------------------+     |
  |    |    sum = sum + i      |     |
  |    |    count = count + 1  |     |
  |    +-----------------------+     |
  +----------------------------------+
              |
              v
  +----------------------------------+
  |       Вывести sum и count        |
  +----------------------------------+

Пояснения:

1. Пользователь вводит значение n с клавиатуры.
2. Инициализируется переменная sum для хранения суммы чисел и переменная count для хранения количества чисел, кратных n. Обе переменные устанавливаются в ноль.
3. Затем происходит цикл от 10 до -10 с шагом -1 (чтобы обойти числа в указанном диапазоне в порядке убывания).
4. Внутри цикла проверяется, является ли текущее число i кратным числу n (т.е. i % n == 0). Если оно кратно, то к текущей сумме sum добавляется i, а счетчик count увеличивается на 1.
5. После окончания цикла выводятся значения sum и count, которые содержат сумму и количество чисел, кратных n.

Примечание: Шаг цикла задан от 10 до -10, чтобы обойти числа в указанном диапазоне. Если вам нужен диапазон от -10 до 10 включительно, шаг должен быть равен 1.