4 Укажите верную запись оператора.
1 LINE (100, 100) – (200, 200)
2 LINE (100; 100) – (200; 200)
3 LINE (100, 100) – (200, 200), 7 В
4 LINE (100-100) – (200-200) 15, B,

program p;

vara,b,c,i,j,n : integer;

beginwriteln('введите три числа'); readln(a,b,c);

if a> b then if a> c then writeln(a,c,b) else writeln(c,a,b) else if c> b then writeln(a,b,c) else writeln(b,c,a);  

readln; end. 

program xxx;

  var a,b,c : string;

begin

    write('введите название 1 фигуры-');

    readln (a);  

    write('введите название 2 фигуры-');

    readln (b);  

    write('введите название 3 фигуры-');

    readln (c);

    writeln (' фигуры: ',a,b,c);

    readln

end.

700 иероглифов было в древнем письме