1. На отрезке [-2; 0,7] с шагом 0,1 протабулировать функцию sin2(x) + cos(x+4,5), построить ее график и найти корни. 2. При подготовке к празднику комиссия предложила несколько вариантов наборов подарков, учитывая стоимость входящих в них предметов. Было закуплено 68 букетов цветов, 132 коробки конфет, 85 флаконов духов. Подарки Наборы подарков 1 2 3 коробка конфет 10 3 8 цветы 3 6 4 духи 4 7 5 Необходимо разделить закупленные подарки на максимальное количество наборов. 3. Какой должна быть стоимость бензина (при постоянно растущих ценах), чтобы на машине стало выгодно ездить на работу, удаленную на 25 км?

var i, n, a: integer; c1, c2, c3, c4: integer;

begin readln(n); for i : = 1 to n do begin readln(a); c1 : = a div 1000; c2 : = (a div 100) mod 10; c3 : = (a div 10) mod 10; c4 : = a mod 10; if (c1 < > c2) and (c1 < > c3) and (c1 < > c4) and (c2 < > c3) and (c2 < > c4) and (c3 < > c4) then writeln('цифры попарно различны') else writeln('не все цифры попарно различны'); end; end.

мне кажется в цифровом виде

if x< 10 then x: =10

else

  if x< 15 then x: = 16

  else x: = 20

для обоих вариантов х=10, потому что дальше первой строчки оно не пойдет

x на первом

у на втором

х+2=у

х+22=3у

отнимаем первое от второго

20=2у

у=10

х=у-2=8