Какой текст будет выведен на метку label1 в результате выполнения наведенного ниже фрагмента программы: var s: string; i, l: integer; begin s : = ’! p-a-s-c-a-l! ’; l: =length(s); for i: =2 to l-1 do if s[i]=’-’ then s[i]=’,’ else if s[i]=’! ’ then s[i]=’-’ end; label1.caption : = s; а) -p, a,s, c,a, l- б) ! p a s c a l! в) ! p, a,s, c,a, l! г) -pascal- объясните в кратце что да как, !

333*3 + 3/3 = 1000

(8888 - 888) / 8 = 1000

11000 (2) = 30 (8) = 18 (16) = 24 (10)

100111 (2) = 47 (8) = 27 (16) = 39 (10)

10100011 (2) = 243 (8) = а3 (16) = 163 (10)

101010101010 (2) = 5252 (8) = (16) = 2730 (10)

program dddd; uses crt; var a,b,c,i: integer; beginclrscr; c: =10; readln(a); while a < > 0 dobeginb: = a mod 10; if b < c then c: =b; a: = a div 10; end; writeln(c); readkey; end.

р треугольника= сложить все стороны