Представление информации в эвм

Vara,b,c,d,x1,x2: real;
begin
writeln('Дано уравнение вида ax^2+bx+c=0');
Writeln ('Укажи переменную "a"');
readln(a);
Writeln ('Укажи переменную "b"');
readln(b);
Writeln ('Укажи переменную "c"');
readln(c);
if a = 0
 then writeln('Не квадратное уравнение!')
 else begin
      d:= sqr(b)-4*a*c;
      if d < 0 then writeln('Нет корней')
               else begin
                    x1:= (-b+sqrt(d))/2*a;
                    x2:= (-b-sqrt(d))/2*a;
                    writeln ('X1 =',x1,'  X2 =',x2);
                    end;
      end;
end.

1)Ро́бот — автоматическое устройство, предназначенное для осуществления различного рода механических операций, которое действует по заранее заложенной программе.

2) Виды:

Промышленный робот

Транспортный робот

Подводный робот

Бытовой робот

Боевой робот

Зооробот

Звероробот

Летающий робот

Медицинский робот и т.д

3) Промышленные роботы все чаще применяются на заводах и предприятиях. Их используют для осуществления функций управления, перемещения и движения в различных производственных процессах. Главная их особенность в том, что они не устают.

4) Стиральная машина, посудомоечная машина и т. д

Надеюсь