Регистрация
Dryunya1989
21.09.2020 03:01
Информатика
Есть ответ 👍

Составьте программу на basic,которые проверяют является ли abs сторонами d треугольника? ,буду .

136
418
Посмотреть ответы 3

Ответы на вопрос:

биг8
биг8
4,5(6 оценок)

cls

input "a="; a

input "b="; b

input "c="; c

p$ = "da"

if a + b < c then

p$ = "net"

end if

if a + c < b then

p$ = "net"

end if

if c + b < a then

p$ = "net"

end if

print p$

ujbgb
ujbgb
4,4(62 оценок)
Microsoft qbasic 1.0 input "a,b,c=", a, b, c if a + b > c and a + c > b and b + c > a then     print "da" else     print "net" end if
gtufifk
gtufifk
4,5(4 оценок)

//pascalabc.net 3.4.2

var x, max: integer;

procedure my_max(x1, x2: ^integer);

begin

  if (x2^ > x1^) then x1^ : = x2^;

end;

begin

  loop 6 do

  begin

    x : = readinteger();

    my_max(@max, @x);

  end;

  write(max);

end.

Популярно: Информатика