информатика
нужно решить 3, 4, 5
по 4, 5 нужно ещё сделать логическую схему, а 3, 4, 5 таблица истинности​

Var a,b,c: real;
    s: string;
begin
  write('длины сторон через пробел:  ');
  readln(a,b,c);
  if (a+b>c) and (a+c>b) and (c+b>a) then
  begin
    if (sqr(a)+sqr(b)=sqr(c)) or
       (sqr(a)+sqr(c)=sqr(b)) or
       (sqr(b)+sqr(c)=sqr(a)) then
        s:='треугольник прямоугольный'
    else
    if (sqr(a)+sqr(b)>sqr(c)) and
       (sqr(b)+sqr(c)>sqr(a)) and
       (sqr(a)+sqr(c)>sqr(b))  then
       s:='треугольник остроугольный'
    else s:='треугольник тупоугольный';
    writeln(s);
  end
  else writeln('треугольник составить нельзя');
end.
 

      Чтобы ответить на вопрос «сколько информации?», надо определить единицу информации каждого символа. Для алфавита (набора букв, цифр, скобок, знаков препинания и других символов) существует понятие информационного веса символа — количества информации, которое несет один символ алфавита, которое обозначается как i и выражается в битах (bit).
      Количество информации в сообщении, представленного символами, складывается из информационных весов і составляющих его символов, причём информационный объём сообщения I равен произведению количества символов в сообщении k на информационный вес символа алфавита i, что записывается как I = k×i.
     Из сообщения в задании следует, что количество всех неповторяющихся символов алфавита неизвестной планеты равно 8. Для такого алфавита і = 3 bit (так как 2³=8), а следовательно, поскольку в этом сообщении k = 12 символов, то информации оно несёт l = k×i = 12×3 = 36 bit.