с информатикой!!! Составить программу, суммирующую числа 2+5+8+11+14+17+20+23+26+29+32.
Надо составить в виде блок-схемы

за два можно. ложим по 3 монеты. если ровно - то фальшивая среди двух оставшихся, которую легко найти. если неровно - то берём 2 монеты из лёгкой чашки и взвешиваем. если ровно - то оставшаяся и есть фальшивая, если неровно - то фальшивая наверху.

var a: array[1..15] of char;

i,min,max: integer;

begin

  min=1;

  max=1;

  for i: = 1 to 15 do begin

      a[i]: = chr(random(256));

      if a[min]> a[i] then min: =i;

      if a[max]< a[i] then max: =i;

  end;

  writeln(a[min], a[max]);

end.

человек

вычислять

воспринимать

закодировать

напечатать

декодировать

понять

обработать

обучить

передать

сохранить

бежать

компьютер

вычислять

закодировать

напечатать

декодировать

обработать

обучить

передать

сохранить

человек может все, а комп кой че не может)

var a : integer; begin readln(a); if (a div 10 > 0)and(a div 100> 0)and(a div 100< 10) then writeln('число трехзначное') else writeln('число не трехзначное'); end.