5запишите значение переменной s, полученное в результате работы следующей программы var s,k: integer; begin s : =5; for k : = 1 to 20 do if (s*k) mod (s-k)= 0 then s : = s + 11; writeln(s); end. 6 ниже записана программа. получив на вход число x , эта программа печатает два числа, a и b. укажите наибольшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 0. var x, a, b : integer; begin readln(x); a : = 0; b : = 1; while x > 0 do begin a : = a + 1; b : = b * (x mod 10); x : = x div 10; end; writeln(a); write(b); end.
