Question

Составьте программу поиска количества чисел в диапазоне от 40 до 60

Answer 1

function isPrime(num: integer): boolean;

begin

 result := num > 1 ? true : false;

 

 for var i := 2 to (num div 2) do

   if (num mod i = 0) then

   begin

     result := false;

     break

   end;

end;

begin

 var list := new List<integer>;

 var (n, i) := (40, 0);

 var count := 0;

 while (n < 61) do

 begin

   if isPrime(n) then

   begin

     list.Add(n);

     count += 1;

   end;

   n += 1;

 end;

 

 list.Println;

 writelnFormat('Count = {0}', Count);

end.

Answer 2

Конечно, вот простая программа на Python, которая считает количество чисел в диапазоне от 40 до 60:

pythonCopy code
def count_numbers_in_range(start, end):
    count = 0
    for i in range(start, end + 1):
        count += 1
    return count

start_range = 40
end_range = 60

result = count_numbers_in_range(start_range, end_range)
print(f"Количество чисел в диапазоне от {start_range} до {end_range}: {result}")

Эта программа определяет функцию count_numbers_in_range, которая принимает начальное и конечное значения диапазона и использует цикл for для подсчета чисел в этом диапазоне. В приведенном примере она используется для подсчета чисел в диапазоне от 40 до 60.