Написать программу c ++ назовем число палиндромом, если оно не меняется при перестановке его цифр в обратном порядке. напишите программу, которая по заданному числу k выводит количество натуральных палиндромов, не превосходящих k. входные данные: задано единственное число k (1 < = k < = 100000). выходные данные: необходимо вывести количество натуральных палиндромов, не превосходящих k. примеры: входные данные 1 выходные данные 1 входные данные 100 выходные данные 18

#include < iostream>

#include < string>

#include < algorithm>

bool p(int value)

{

    std: : string left = std: : to_string(value);

    std: : reverse(left. left.;

    std: : string right = std: : to_string(value); ;

    return left == right;

}

int main()

{

    int n;

    std: : cin > > n;

    int count = 0;

    for (int i = 1; i < = n; ++i)

    {

        if (p(i))

        {

            count++;

        }

    }

    std: : cout < < "count palindrome: " < < count < < std: : endl;

    return 0;

}

#include< iostream>

int reverse(int n)

{

int t, a = 0;

while (n> 0) {

    t = n % 10;

    a = a * 10 + t;

    n /= 10;

}

return a;

}

int main() {

int n, c = 0;

std: : cin > > n;

for (int i = 1; i < = n; i++) if (i == reverse(i)) c++;

std: : cout < < c < < std: : endl;

}

массив данных о стоимости товаров зададим в виде целочисленных констант

program primer_1; const a: array[1..12] of integer = (170, 180, 25, 36, 750, 1, 45, 28, 39, 10, 11, 58);   i,min,k: integer;   begin

min: =a[1];  

for i: =2 to 12 do     if a[i]< min then

                                              begin 

                                              min: =a[i];                                               k: =i; write('минимальная стоимость ', min, '   индекс' ,k) end.

или скорее всего этот вариант

program primer_1; var a: array[1..12] of integer; i, min, k: integer; beginfor i: =1 to 12 do read(a[i]); {ввод стоимостей товаров}min: =a[1]; k: =0; for i: =2 to 12 do if a[i]< min then begin min: =a[i]; k: =i; end; write('мин. сто-мость ', min, ' индекс ' ,k)end. 

const m=10; n=12; var a: array [1..m,1..n] of integer; i,j: integer; sob: integer; sst: array[1..n]of integer; sstr: array[1..m]of integer; beginrandomize; for i: =1 to m do beginfor j: =1 to n do begina[i,j]: =random(10); write(a[i,j]: 3); end; writeln; end; sob: =0; for i: =1 to m do beginfor j: =1 to n do beginsob: =sob+a[i,j]; end; end; writeln('сумма всех элементов массива = ', sob); writeln; writeln; for i: =1 to m do beginsstr[i]: =0; for j: =1 to n do beginsstr[i]: =sstr[i]+a[i,j]; end; end; writeln('сумма элементов построчно'); for i: =1 to m do write(sstr[i]: 3); writeln; writeln; for j: =1 to n do beginsst[j]: =0; for i: =1 to m do beginsst[j]: =sst[j]+a[i,j]; end; end; writeln('сумма элементов по столбцам'); for j: =1 to n do write(sst[j]: 3); end.