Как округлить число в меньшую сторону в программе кумир? например, 3,5 в 3.

(см. объяснение)

Объяснение:

Первый :

Воспользовавшись возможностями PascalABC.NET, напишем программу:

begin

 var a: array of integer := seqGen(5807,x->x+2595).Where(x->(x mod 2 = 0) and (x mod 13 <> 0)).ToArray();

 a.Count.Println; a.Sum.Println;

end.

Второй :

Чистый Pascal тоже позволяет решить эту задачу, только вот код сильно длиннее:

var i,k,sum: integer;

begin

 k:= 0;

 sum:= 0;

 for i:= 2595 to 8401 do

   if((i mod 2 = 0) and (i mod 13 <> 0)) then

   begin

     k:= k+1;

     sum:= sum+i;

   end;

 writeln(k);

 writeln(sum);

end.

В обоих случаях получаем два числа: 2679 и 14728918.

Задание выполнено!

#include <iostream>

#include <cmath>

using namespace std;

bool is_prime_num(int x) {

   for(long long i=2 ; i <= sqrt(x); i++)

 if( x % i == 0)

  return false;

return true;

}

int main()

{

   int arr[10000];

   int n;

   cin >> n; // вводим кол-во элементов массива

   for (int i = 0; i < n; i++)  {

       cin >> arr[i]; // вводим элементы массива n раз

   }

   int a,b;

   cin >> a >> b; // вводим границы диапазона

   int result = 0;

   for (int i = a; a < b; i++) {

       if (is_prime_num(arr[i])) {

           result = arr[i];

           break;

       }      

   }

   if ( result == 0) cout << "There is no prime";

   else cout << result;

   return 0;

}

Объяснение:

 Как - то так, если что непонятно - спрашивай