Какую роль в развитии компьютерной графики сыграли графические дисплеи

Program ran; label main; var x, y, min, max, s, p, d: integer; begin randomize; writeln('ввод промежутка'); write('от: '); readln(min); write('до: '); readln(max); main: x : = min + random(max - min + 1); y : = min + random(max - min + 1); if not(x = y) then begin s : = x + y; writeln('сумма: ', s); p : = x * y; writeln('произведение: ', p); if p > s then begin d : = p - s; writeln('произведение больше суммы на ', d); end; end else begin writeln('случайные числа равны, повтор '); goto main; end; end. ²

Var   a,b,s,p: real; begin   write('введите два числа через пробел: ');   read(a,b);   if a< > b then begin       s: =a+b; p: =a*b;       writeln('сумма равна ',s,', произведение равно ',p);       if p> s then writeln('произведение больше суммы на ',p-s: 0: 5)       end   else writeln('числа равны') end. пример введите два числа через пробел: 24 15.2 сумма равна 39.2, произведение равно 364.8 произведение больше суммы на 325.60000