? - фальшивая
+ - настоящая
dif - знание о весе фальшивой (больше или меньше)
vs - взвешивание
=> - итог взвешивания
1 откладываем
1) 7? vs 7?
if == => 14+ 7? goto 2)
if <> => 7+ 14? goto
2) 4? vs 4+
if == => 18+ 3? goto 3)
if <> => 10+ 4? goto
3) 2? vs 2+
if == => 20+ 1? goto 4)
if <> => 19+ 2? goto
4) 1? vs 1+
if == => фальшивая та что отложена вначале
if <> => нашли
Uses crt;
var i,s:integer;
begin
s:=0;
for i:=1 to 10 do
s:=s+i*i;
writeln(s);
end.
A = 'A'
СИМВОЛЬНЫЙ
B = 456
ЦЕЛЫЙ
С = 123.4
ВЕЩЕСТВЕННЫЙ
D = True
ЛОГИЧЕСКИЙ
А можно порусски пожалуйста написать
Листинг программы и скриншот результата в приложениях