Ребята я уверен что никто не решит и 20 балов пойдут в пустую. Но если то большой вам поклон.

Задание № 3. Задача о 12 монетах.
Имеется 12 золотых монет. Одна из них – фальшивая, но не известно, легче она или тяжелее остальных. Найти фальшивую монету за 3 взвешивания и установить, легче она или тяжелее.

сначала берём 12 монет и делим их напополам и кладём по 6 монет на каждую из чаш весов. Так мы вычислели в какой из кучек монет находится фальшивая монета. (потрачено одно взвешивание) После этого делим напополам ту кучку которая оказалась легче и кладём по 3 монеты на чаши весов. Так мы вычислели в какой из кучек монет находится фальшивая монета.(потрачено второе взвешивание) Теперь достаем из той кучки которая осталась легче две монеты и кладём их на чаши весов если они равны то 3 монета является фальшивой, а если одна из них легче то ну это и есть фальшивая монета.(потрачено третье взвешивание).

Объяснение отметь как лучший

на pascal:

program sonik;

uses crt;

var a,b,c: string;

begin

readln (a);   readln (b);   readln (c);

writeln (' фигуры: ',a,b,c);

end.

#include < stdio.h>

#include < conio.h>

int main( void )

{

  int c, i;

  printf("input number: ");

  scanf(& c);   //амперсант c в скобках

  i = (int)(c%10);

  c = i*i;

  printf("answer: %i", c);

  getch();

  return 1;

}