Даны действительные числа a, b , c. выяснить, существует ли треугольник с длинами сторон a, b, c. (в visual basic) ! пробовала так: private sub commandbutton1_click() dim a, b, c as single if (a < b + c) then yes if b < a + c then yes if c < a + b then yes но не знаю как закончить !

Private Sub CommandButton1_Click()
Dim a, b, c As Single
If (a<b+c) and (b<a+c) and (c<a+b) Then
  MsgBox "Yes"
Else
  MsgBox "No"
End If
End Sub

//PascalABC.NET 3.2 сборка 1318

Uses
  GraphABC;

Var
  h:integer;
begin
h:=40;
line(window.Width-300,window.Height,window.Width-300,0);
floodfill(window.Width-20,20,clGray);
rectangle(window.Width-200,100,window.Width-100,300);
floodfill(window.Width-150,140,clGold);
while h<>window.Height-40 do
  begin
    circle(window.Width div 2,h-40,10);
    floodfill(window.Width div 2,h-40,clGreen);
    circle(window.Width div 2,h,30);
    floodfill(window.Width div 2,h,clRed);
    rectangle(0,0,window.Width div 2+40,window.Height);
    floodfill(window.Width div 2+40,window.Height,clWhite);
    inc(h);
  end;
  circle(window.Width div 2,h-40,10);
  floodfill(window.Width div 2,h-40,clGreen);
  circle(window.Width div 2,h,30);
  floodfill(window.Width div 2,h,clRed);
end.

1) 0,4 кг =400 гр -это 100% , 1%=400:100=4гр, следовательно 15% = 15*4=60 грамм,
60 гр составляют 1/5 часть конфет, значит 1 целая конфет = 60*5=300 гр. , тогда вес коробки= 400-300=100 гр.

2) аналогично:
50 кг - это 100%, тогда 1%=50:100=0,5 кг, отсюда 45%=0,5*45=22,5 кг и это половина всех конфет, значит все конфеты весили 22,5*2=45 кг, тогда ящик весит 50-45=5 кг

3) 60 кг = 100%, 24%=60:100*24=14,4 кг-это четверть конфет, значит все конфеты весили 14,4*4=57,6 кг, тогда ящик весит 60-57,6=2,4 кг