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