Запишите число, которое будет напечатано в результате выполнения следующей программы. для вашего удобства программа представлена на пяти языках программирования. var k, s, d: integer; begin readln(d); s : = 0; k : = 0; while k < 100 do begin s : = s + 32; k : = k + d ; end; write (s); end.