Если надо найти палиндром,идущий за числом N. То вот программа:
Общество, в котором большинство работающих занято производством, хранением, переработкой и реализацией информации, особенно высшей её формы — знаний
<h2>Алгоритм решения</h2>
Рассмотрим первый тест. Мы знаем, что карточки пронумерованы от 1 до N, и что утеряна была ровно одна карточка. Пусть x равен сумме номеров всех карточек от 1 до N. Тогда y равен сумме номеров карточек, что даны нам во вводе. Значит, номер потерявшейся карточки - это x - y
x = 1 + 2 + 3 + 4 + 5 = 15
y = 3 + 5 + 1 + 4 = 13
ans = x - y = 15 - 13 = 2, <em>Ответ: 2.</em>
Правда, тогда придется "угадать" тест, где N равно единице, поскольку мы используем <u>do-while</u> для ввода. Логично, что в наборе из одной карточки могла потеряться только эта единственная карточка.
<h2>Код</h2>
Дан в приложении.
Перелить 12 литров кваса в восьмилитровый и трехлитровый сосуд отдать первой семье, потом еще раз с восьмилитрового отлить в трехлитровый и снова отдать первой семье. Оставшиеся квас достается второй семье.
Пишу ответ на С++ и QBasic, если у Вас другой язык, то просто измените синтаксис:
1) max=-10000;
number=0;
for (int i=0;i<3;i++)
{
if A[i]>max;
{
max=a[i];
number = i;
}
}
2)
<span>DECLARE FUNCTION f! (x!)
CLS
INPUT "[A; B] = "; A, B
INPUT "SHAG H = "; n
FOR x = A TO B STEP n
n = n + 1
IF n MOD 20 = 0 THEN
PRINT "PRESS ENTER"
DO: LOOP UNTIL INKEY$ <> ""
CLS
ELSE
IF ABS(x) < 1 THEN
PRINT USING "X = ###.###"; x;
PRINT " Y = ---"
ELSE
PRINT USING "X = ###.### Y = ###.###"; x; f(x)
END IF
END IF
NEXT
END
FUNCTION f (x)
IF ABS(x) <= 2 THEN
IF ABS(x) >= 1 THEN f = SQR(x ^ 2 - 1)
ELSE
f = x + 5
END IF
END <span>FUNCTION</span></span>