Язык С: 36 -Оператор вывода

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.

только  25-18=7 человек

только французский 27 - 18 = 9 человек

ну а на вопросы не отвечу =))

21 зависит от того чему равны в1 и а1

23 увижу этотт фрагмент - тогда скажу

24 аналогично 23

25 аналогично 23

26 сумм(в1: в3) = 3*3 = 9.

13-9 = 4

27 дайте таблицу тогда и видно будет

28 какого алгоритма?

var x,c: real;

begin

read(x);

c: =frac(c);

writeln(c: 1: 6);

readkey;

end.