Для Pascal:
Как вариант, можно возвести в квадрат и тут же из него взять корень
y := sqrt((x-1)(x-1)) + sqrt((x-4)(x-4))
Однако, для этого y должен быть объявлен как вещественный тип (real, double), поскольку функция взятия корня возвращает вещественный тип, и потому в целочисленном y сохраниться не может.
Исходный код в приложении.
Var
a, b, c: real;
begin
read(a, b, c);
if (a + b > c) and (b + c > a) and (a + c > b)
then write('существует.')
else write('не существует.')
<span>end.</span>
Я на уроке информатики научилась правильно использовать компьютер и быстро находить ответ по своему запросу. Я теперь знаю как собрать компьютер из его частей и знаю как эти части называются.
Информатика очень интересный предмет.
1. Если первый игрок (П) удвоит число камней в первой кучке, то всего будет 4 + 3 + 4 = 11 камней. Если второй игрок (В) добавит в каждую кучку по 2 камня, то всего станет (4 + 2) + (3 + 2) + (4 + 2) = 17 камней => П проиграет при любом своём ходе. Если В удвоит число камней в первой кучке, то будет 8 + 3 + 4 = 15 камней => выиграет П, удвоив число камней в первой кучке (однако это можно расценивать как поддавки). Если В удвоит число камней во второй кучке, то будет 4 + 6 + 4 = 14 камней => П проиграет при любом своём ходе. Если В удвоит число камней в третьей кучке, то будет 4 + 3 + 8 = 15 камней => выиграет П, удвоив число камней в третьей кучке (тоже очевидные поддавки со стороны В).
2. Если П удвоит число камней во второй кучке, то всего будет 2 + 6 + 4 = 12 камней. В, добавив по 2 камня в каждую кучку, получит (2 + 2) + (6 + 2) + (4 + 2) = 20 камней, и тогда П легко сможет выиграть, удвоив число камней во второй кучке или добавив в каждую кучку по 2 камня. Если В удвоит число камней в первой кучке, то всего будет 4 + 6 + 4 = 14 камней => П проиграет при любом своём ходе. Если же В удвоит число камней во второй или третьей кучке, то П выиграет, удвоив число камней в этой же кучке.
3. Если П удвоит число камней в третьей кучке, то всего будет 2 + 3 + 8 = 13 камней. В, удвоив число камней в третьей кучке, получит 2 + 3 + 16 = 21 камень и выиграет, ибо в третьей кучке 16 камней. Однако в таком случае можно сказать, что П поддался, ибо очевидно, что не стоит делать в одной кучке 8 камней.
4. Если П добавит по 2 камня в каждую кучку, то станет (2 + 2) + (3 + 2) + (4 + 2) = 15 камней. Если В удвоит число камней в любой кучке, то П, удвоив в этой же кучке число камней, выиграет. Если В добавит в каждую кучку по 2 камня, то П, также добавив в каждую кучку по 2 камня, выиграет.
Получается, П абсолютно точно выиграет, если добавит по 2 камня в каждую кучку.
Надеюсь, я нигде не напутала.
begin
var a := ArrGen(10, i -> 20 * i + 13);
a.Println;
var b := ArrGen(17, i -> 17 - i);
b.Println
end.
Объяснение:
Тут главное найти формулу для общего члена.
а) 33 - 13 = 20; 53 - 33 = 20 ... все понятно, последующий элемент получается из предыдущего путем прибавления 20.
a[i+1] = a[i] +20 - это рекуррентная формула.
Можно также получить значение любого элемента как
a[i] = 20*i - 7, где i = 1, 2, 3,... 10 или
a[i] = 20*i + 13, где i = 0, 1, 2, ... 9
б) Здесь числа просто убывают от 17 до 1.
a[i+1] = a[i] - 1 - рекуррентная формула
a[i] = 18 - i, где i = 1, 2, 3, ... 17 или
a[i] = 17 - i, где i = 0, 1, 2, ... 16
Какие из этих формул были использованы в приведенной программе, видно без объяснений.