1.Вычислить значение функции F=(A→B*C)*((A+C)→AB), если А=14, В=68, С=117 2. У четырех участниц соревнования по легкой атлетике Ани, Даши, Гали и Вали спросили кто занял какое место. Получены ответы.
1.Аня второе, а Даша третье
2.Аня первое, а Даша второе
3.Галя второе, а Даша четвертое
Известно, что в каждом случае только одно высказывание верно. Кто занял какое место?

пролететь - расстояние

проехать на лифте - номер этажа 

спрыгнуть - высота, скорость

поесть - количество

повернуть - время или направление

program xxx;

  var i, k, c, e : integer

begin

  k: =0;

  for i: =100 to 999 do

      begin

          c: = i div 100;

          e: =i mod 10;

          if c = e then k: =k+1

    end;

  writeln('кол-во палиндромов =', k);

  readln

end.

program sir; var y,x,h: real; beginx: =280; h: =0.1; while h< =1 do  begin  y: =x*h;   writeln('цена за ',h*1000,' грамм ',y,' руб');   h: =h+0.1  end; end.

(1*2**5)-6-7=1