Запишите на языке паскаль логическое выражение, имеющее значение true при выполнении указанного условия и false в противном случае. результат вычисления выражения присвойте логической пере- менной f. а) натуральное число x является полным квадра- том. б) число x находится вне одного из отрезков (любого) [-17, -2] и [-4, 9]. в) только два из чисел x, y, z равны между со- бой.

А) F := x = sqr(trunc(sqrt(x)))

б) F := (x < -4) or (x > -2)

с) F := ord(x = y) + ord(x = z) + ord(y = z) = 1

По условию данной нам задачи сказано, что общее число купленных персиков равно неизвестной а, также после покупки количества а персиков мы убираем от количества а количество b персиков, так как они оказались ещё зелёными. Следовательно у нас имеется количество съедобных персиков равны а - b. По условию задачи дано, что количество съедобных персиков было разделено поровну между четырьмя детьми. То есть мы количество а - b делим на четыре и получаем количество персиков которое получил каждый из детей.

ответ : каждый получил ( а - b ) / 4 персиков

#include <stdio.h>

#include <stdlib.h>

#include <time.h>

int main()

{

   int *arr;

   int x, y, i, j, sum = 0, min = 0, minstr = 0;

   srand(time(NULL));

   x = 2 + rand() % 10;

   y = 2 + rand() % 6;

   arr = (int*)malloc(x*y*sizeof(int));

   printf("Array %d x %d: \n", x, y);

   for (i = 0; i < x; i++){

       for (j = 0; j < y; j++){

           *(arr + i*y + j) = -50 + rand() % 100;

           printf("arr[%d][%d] = %3d; ", i, j, *(arr + i*y + j));

       }

       printf("\n");

   }

   for (i = 0; i < y; i++)

       min += *(arr + i);

   minstr = 0;

   for (i = 1; i < x; i++){

       for (j = 0; j < y; j++)

           sum += *(arr + i*y + j);

       if (sum < min) {

           min = sum;

           minstr = i+1;

       }

       sum = 0;

   }

   printf("Minimum amount: %d (%d line)", min, minstr);

   free(arr);

   return 0;

Объяснение:

это пример как делать