Надо смотреть не по горизонтале, а по вертикале
1. Начало
2. Запиши число
3. Вычти 10 (разница между 5 и 15, 20 и 30 и т.п.)
4. Если полученное число меньше 10 (разница 15 и 18, 30 и 27 и т.п.)
то 5. Прибавь 3
иначе 6. Вычти 3
7. Прибавь 2 (разница 18 и 16, 27 и 25 ...)
8. Конец
Вроде так
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=ReadlnString('Вводите').ToIntegers; mas.println;
var a:=readinteger('Введите число a:');
Writeln('Количество чисел которые меньше а=',mas.Where(t->t<a).Count);
end.
//Dev-C++ 5.11
#include <stdio.h>
int main(void)
{float a[10][10]={0},newar[100]={0},min=2147483647;
int i,j,n,c,coucurr=1,newn=0,boo=0;
scanf("%d",&n);
for(i=0;i<n;i++)
for(j=0;j<n;j++)
{scanf("%f",&a[i][j]);
newar[newn]=a[i][j];
newn++;}
for(i=0;i<newn;i++)
{for(j=0;j<newn;j++)
if (newar[i]==newar[j] && i!=j)
coucurr++;
if (coucurr>1 && min>newar[i])
{min=newar[i]; boo=1;}
coucurr=1;}
if(boo)
printf("%f",min);
else
printf("Nothing");
return 0;}
Пример ввода:
3
1
2
2
3
3
3
4
4
4
Пример вывода:
2<span />
A > not ( not A or B and not C ) = not A or not A or B and not C = not A or B and not C
1213 312 1519 1212 ,,,,,,,,,,,,